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PURPOSE of the ARCADIAN is to disseminate material having to do with the 
Bally/AstroVision Arcade game/computer. The underlying reason for the paper 
is to help all understand hew and why the machine operates the way it does. 
We can then make it operate the way we want it to, and we can expand its 
usefulness». 


A HISTORY STATEMENT is getting to be a tradition - a few words for those who 
start their subscription with Volume III: When the Chicago mail order house 
of JS&A advertised the Bally in the popular magazines in Sept 1977, a number 
of us bought into it. Lots of promises, but delivery was poor, both on the 
existing hardware and on the promised stuff. Seme never did come. The Tiny 
Basic cartridge did show up about a year later, and I started this paper in 
Novanber, 1978. I got tired of waiting for the Add-On and was about to 
contract for a slightly smaller unit when the Fidelity deal made us take a 
second look. There was no point in trying to compete with the factory, and 
that is still a consideration. Instead, we started to concentrate on small 
Projects (more later). AstroVision took over the consumer products div.of 
Bally in August 1980, and we are now looking to them for continued support. 

USER GRO UP REPORTS are needed - partly to get others in the area to attend, 
and partly for our mutual knowledge. You don't have to submit as polished 
an item as George Moses did -printing is his business. - we just need 
something that is informative and legible, as: 

Chicago Bally User Group meets 3rd Sunday every month at 

DeVry Technical Institute 3300 N. Campbell Chicago, IL 
contact: Mike Maslowski 312-654-8937 

SHORT PERSONAL NOTE of thanks to those who sent well wishes on our 25th. 

We enjoyed a four-week sojourn to Europe, where we spent three really 
beautiful weeks in Switzerland. One of my other hobby interests is model 
railroading, and the Swiss have a well-ordered system that operates with 
precision and the trip was quite informative to me. We also made 6 lake 
voyages by boat, and climbed the Susten Pass by postal bus to see the 
Alps up close. 


FOFMAT of this paper is rather loose, but I try to include material for 
both the tyro and the expert. Material in the ARCADIAN is subscriber 
generated, so I am looking to you for our continued operation and therefore 
mutual learning. I need programs and tutorials, and at all levels. Programs 
should be sent as a tape, and a listing as well would help for those times 
when a garble comes through. The programs in the ARCADIAN are listed 
directly from the Bally to a CCMPRINT 912S printer. There is a little 
idiosyncracy in that combination - the printer has no divide sign (neither 
does my typewriter), and it can't tell the difference between a multiply 
sign or a lower case X, and there is no right arrow, either. So, whenever 
you see a lower case letter, it means: a = right arrow ( > ) 

b = multiply ( x ) 
c = divide ( f ) 


ASTROVISION TAKEOVER The new manufacturer of the Arcade is AstroVision,Inc., 
a Columbus, Ohio firm. The actual production will probably be done at their 
subsidiary, E.F.Johnson, the CB manufacturer. Latest words on plans, etc., 
are in George Moses' report , following... 
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BLUE RAM TUTORIALS will again appear in the next issue. I wanted to get the 
interesting news from the Michigan User Group out to all, so I have deferred 
some material to next month. 
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BLUE RAM KEYBOARD O PTION . To clarify my announcement of last month - Should 
you desire a wired and tested unit, ready to plug into the Blue Ramv send me 
89»95* Should you want a kit of the electronic parts, send $24.95 to me, 
and order the keyboard itself from JAMECO. You could use another keyboard 
that you have lying around, which is why we offer it this way, but we know 
it will work with the JAMECO. 
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TUTORIAL MULTI-PROCESSING SYSTEMS 

Definition. A multi-processing system consists of any computer system 
which utilizes two or more processors, such as the Bally and the TRS-80, 
both using the Z80; or the new Microsoft Z80 that fits into the Apple (6502), 
with two different processors. 

Discussion. Project Three will be an interface which allows coupling thq 
Bally system buss to the TRS-80 system buss with buffers, and signals gener- ' 
ated to be compatible with the TRS-80 expansion module, fy utilizing a 4K 
RAM block and appropriate WAIT lines, each Z80 CPU can put and take data in 
an intermediate location, thus allowing maximum speed and minimum programming. 

Application. By using the correct software, we may use the TRS-80 
keyboard to produce desired signals for the Bally to read, i.e., an intel¬ 
ligent keyboard. We may also display the Bally memory on the TRS-80 monitor. 
This requires that machine language be loaded into the Bally, to allow it to 
read the external RAM and write to it. By using the TRS-80's extensive trig 
routines in Level II Basic, we can plot multi-color graphics on the Bally 
display with complex formulae. If machine language routines are used, then 
screen memory is not needed and so four colors may be displayed, and POKEd 
for high speed display animation. By using the Bally's A to D conversion 
system, the TRS-80 may run game programs which require 'paddle' input. The 
TRS can read data from the Bally to send to a parallel printer. The disc 
capability of the TRS expansion unit may be utilized. And more... 

All of the above are practical, but the system has yet to be tested. 

Comments, ideas, help, etc., are solicited, and a stamped envelope would 
be appreciated. Contact Rich Tietjens,1008 Trinity, #B, Seaside, CA 93955 

FILE SEARCH It is possible to haVe the Bally look for a specific program 
on tape and load only that program when it gets to it. Programs of any H| 
kind on a tape or disc are usually called "files" in big machine-talk, 
and are either titled or numbered. On the Apple, for example, you can 
call a file "george" and ask the computer to "RUN GEORGE" fran disc, and 
it will search for george, load it, and then run it. On the Tektronics, 
it would be numbered, and you'd enter "FIND 6/LOAD/RUN" to do the same 
thing. Well, in studying the Tiny Basic listing, A1 Rathmell found that the 
Arcade will do the same thing. His report follows: 

''To make use of the file finding capability of Basic, a file number 
must be written on tape when the file is created. The number is a 
16 bit (two 8-bit bytes) integer, and can have any value from -32768 
to + 32767, but for simplicity, if the high order byte (the first 
one) is always zero, then file numbers from 0 to 255 cah be written 
in the low order byte. The two file number bytes are written in the 
proper format using the TV instruction. For example, to write a 
program on tape as file number 10, use the following command: 

:PRINT; TV=0; TV=10; LIST 

The first TV instruction writes the high order byte (zero), and the 
second TV instruction writes the low order byte (ten). To read file 
number 10 into the Bally, use the following command: 

:INPUT 10 

The file finding system also works with the :LIST and :RUN commands. 
Using the file numbering capability of felly Basic adds a professional 
touch to tape file management!" 


on the back page are free. Please make them legible. In providing this 
service I am also providing no guarantees and take no responsibility at all. 
Half-page and up ads are not free, contact me for data. 
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PROGRAM REVIEW 


PROGRAM NAME: Tlc-Tac-Tollah TYPE: GAME 

DESCRIPTION: The Ayatollah adds a new dimension to tlc-tac-toe: cheating! 

His eyes and mouth move as he constantly changes his mind, changes his moves, 
and changes the rules! Can you beat him by playing fair? Can you exercise 
diplomatic restraint? A really unique and creative addition to the old game. 


SOURCE Name: Anderson Research and Design 

Address: 1611 Lacota Lane 

City: Burnsville State: MN ZIP: 55337 


PROGRAM PRICE: $ 4.95 LISTING PRICE: Not Available 


RATING % based on applicable rating items. 

PD= 8 PP= 8 USF= 6 LC= 9 0C= 8 LI= 7 
Time to play 3 min. For ages 8 up 

Richard Houser 


62 / 72 = 86.1% 

EV= XX EU= 9 0V= 7 

# of players 1 


PROGRAM NAME: GRAPHICS DEMO TYPE: Tutorial 

DESCRIPTION: Practical applications of principles described in the CURSOR 

Tutorial — DMA Graphics--- by C. 0. Anderson (April 80). Contains XY to Pixel 
Locations Poke to Pixel Chart; Screen Locator; Decimal to Poke; Type Sample and 
Explorer I Demo. This Is mainly for people who want to explore the BALLY’s 
graphics capabilities. 


SOURCE Name: Anderson Research and Design 

Address: 1611 Lacota Lane 

City: Burnsville State: MN ZIP: 55337 

PROGRAM PRICE: $ LISTING PRICE: Not Available 


RATING % based on applicable rating 
PD= 5 PP= 7 USF= XX LC= XX 0C= 8 
Time to play NA For Ages 

Reviewed by Richard Houser 


1 terns. 
L I = 8 
10 up 


51 / 63 = 80.9% 
EV= 8 EU= 7 OV 
# of players I 


PROGPvAM NAME: Checkbook TYPE: Personal 

DESCRIPTION: A program designed to be used by any member of the family 

to balance their personal checking account. The program explains Itself as it 
goes along. 


SOURCE Name: Anderson Research and Design 

Address: 1611 Lacota Lane 

City: Burnsville State: MN ZIP: 55337 


PROGRAM PRICE: $ 


LISTING PRICE: Not Available 


RATING % based on applicable rating Items. 38 / 54 = 70.3% 

PD= 7 PP = 7 USF= XX LC= XX 0C= 7 LI= 7 EV= XX EU= 7 0V= 3 
Time to play NA For ages 10 up # of players 1 

Reviewed by Richard Houser 

PROGRAM NAME: Video Rally TYPE: GAME 

DESCRIPTION: This Is the most Intriguing game program that I have found 

for the BALLY. If you have ever done any TSD ( Time Speed & Distance) Rally's 

you should buy this and you will spend hours trying to get the lowest score. 

This Is a great training aid In preparing for an actual TSD rally. The 
Instructions for this program are excellent (8 pages). This doesn't make 
the playing of this game easy, however. 


SOURCE Name: Anderson Research and Design 

Address: 1611 Lacota Lane 

City: Burnsville State: MN ZIP: 55337 


PROGRAM PRICE: S 


LISTING PRICE: Not Available 


RATING % based on applicable rating items. 

PD= 9 PP= 9 USF= 9 LC= 9 0C= 9 LI= 9 
Time to play 15 min. For ages 14 up 

Reviewed by Richard Houser 



70 / 72 = 97.2 
EV= XX EU= 9 0V= 7 

# of players 1 
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240 
245 
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.SPEED 0 MRTH 
.BY BOB WISEMRN 
:RETURN ;CLERR ;BC=65;FC=197 
PRINT 'ENTER +,-,c,OR b 


Q=KP;S=0 


CLERR ;FOR N=1T0 10;T=0;R=63 
GOSUB 100;GOSUB 400 


CX=-35;CY=35;S=S+T 
PRINT ‘SCORE=*,*4,S 
NEXT N 
GOTO 20 

X=RND (9 ) ;Y=RND (9) 

IE Q=43Z=X+Y;GOTO 200 
IF Q=98Z=XbY;GOTO 200 
IF Q=45W=X+Y 
IF Q=99W=XbY 
Z=X;X=W 

R=20180;B=R;C=300;E=2 


445 

450 

460 

465 

470 

475 

480 

500 

505 

580 

595 


D=-43;GOSUB C 
D=53;GOSUB C 
D=19521;GOSUB C 
D=20190;GOSUB C 
D=-13871;GOSUB C 


IF R=63L=X;M=Y;0=Z 


Bob Wiseman 

118 St. Andrews Dr. 

Cincinnati, OH 45245 


IF W X=X+R 
R=R+l;RETURN 

R=Y+48;U=X;GOSUB 200;NT=0;&(16 )=75;&(22 )=-l 
IF M=UGOTO 500 

T=T+300;FOR I=55T0 25SSTEP 5 
&C18)=I;&(17)=Ic2;NEXT I 
GOTO 580 

FOR I=200TO 1STEP -5 
&C18)=I;&(17)=Ic2;NEXT I 
T=200-T;NT=2;&(17)=0;&C18 )=0 
RETURN 


This Math drill program uses 
the giant letter routine. 


IF R<63X=L;Y=M;Z=0 
E=1;D=32;GOSUB C 

E=1;IF X>9D=48+Xc10;X=RM;GOSUB C 

D=48+X; GCF5UB C 

D=32;GOSUB C 

D=Q;GOSUB C 

D=32;GOSUB C 

D=R;GOSUB C 

D=32;GOSUB C 

D=61;GOSUB C 

IF Z >9D=48+Zc 10; Z«=RM; GOSUB C 
D=48+Z;GOSUB C 
IF LC10IF O<10D=32;GOSUB C 
D=0;GOSUB C;CRLLB;RETURN 
R )=D; R-R+E; RETURN 
I=&(23 );J=&(22 );K=&(21 );T=T4i 
IF I+J+K=0GOT0 400 
R=0;X=0 
W=I;GOSUB 430 
W=J;GOSUB 430 
W=K;GOSUB 430;GOTO 460 
IF W=8X=1 
IF W=4X=4 
IF W=2X=7 


Instructions,etc., for HORSE RACE, 
on p. 7: 

#1 


Each player uses his hand controller 
to choose the horse he wants to bet 
upon and the size of his bet. To 
choose the horse, first move the knob 
to one of the four positions (see 
diagram) and then pull trigger. To 
place a bet, move the knob forward 
to increase the amount by $5, move 
it back to decrease by $5* Set the 
bet with the trigger. 


Horse #4 





BSR X-10 CONTROL can now be placed under Bally control. Our latest device 
will operate the BSR transmitter box (if it is the type that accepts 
'remote control') through the Blue Ram. Fully assembled with documentation 
and-a demo program, it operates wireless up to 15' from the BSR box. The 
price is $ 19 » 95 » 

- & - 
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. HORSE RACE * 

.BY HOWARD BRECHEISEN 

CLEAR ;BC=179;INPUT "# OF PLAYERS?"H 
CLEAR ;A=500;FOR I=1T0 H;@CI)=A 
NEXT I 

CLEAR ;BC=18;FC=14 
NT=0;&< 3)=175 

LINE -12,-44,4;LINE -12,43,1 

CX=-7G;CY=30 

PRINT "HORSE ODDS 

Z=10;FOR I=1T0 4 

CY=Z;1+8)=RND ( 5) + l;1+12 )=0 

PRINT ,#2,I,#5,@(1+8),":1" 

Z=Z-15;NEXT I 
CX=-6;CY=30 
PRINT “PL POT BET HR 
CX=-G;CY=20;PRINT 
Z=10 

FOR I=1T0 H 
CX=-5;CY=Z 
PRINT #1,1,#5,@CI) 

Z=Z-15;NEXT I 
GOSUB 252 
NT=3;Z=10 
FOR I=1T0 H 
CY=Z;CX= 68 ; PRINT #1,@C' 

IF TRCI )GOTO 44 
IF JY(I)=1@(1+12)=1 
IF JXC I ) = 1@( 1 + 12 )=2 
IF JYCI )=-1@(1 + 12)=3 
IF JX(I)=-1@C1+12)=4 
GOTO 37 
Z=Z-15;NEXT I 
B=0;Z=10 
FOR I=1T0 H 
CY=Z;CX=42;PRINT #1,1 
IF TRCDGOTO 57 


500 BOX X,Y,G,4,J 

501 LINE X+5,Y+3,L 

502 BOX X+G,Y+4,3,2,J 

503 BOX X+G,Y+4,1,1,K 

504 LINE X- 6 ,Y-4,J 

505 LINE X-7,Y+l,L 
50G LINE X-4,Y+l,J 

507 LINE X+5,Y-4,J;RETURN 


122 NEXT I 

TTT2T 


54 IF JYCI)=lB=B+5;GOTO 52 

55 IF JYCI )=-lB=B-5;G0T0 52 

56 GOTO 52 

57 @( I+4)=B;B=0;H>< I )=@( I )-@( 1+4) 

58 Z=Z-15;NEXT I 
G3 GOSUB 252 

70 CLEAR 

71 &(9)=42 

72 BC=89;FC=6 

73 BOX 0,0,158,72,3;B0X 0,0,155,70,3 

74 LINE 60,34,4;LINE 60,-35,3 

75 LINE 59,-17,4;LINE -77,-17,3 

76 LINE -77,1,4;LINE 59,1,3;LINE 59,18,4;LINE 

77 NT=0;CX=40;CY=40 

78 PRINT "FINISH 

79 NT=3 

107 Z=25;D=-50;E=-50;F=-50;G=-50;J=1;K=2; L=4 

108 FOR I=1T0 4 

109 CX=-70;CY=Z 

110 PRINT '*',*1,1;GOSUB 490+1 

112 Z=Z-17;NEXT I 


113 11 - D>53IF D>EIF D>FIF D>G P=1;Q=@(9);GOTO 150 

114 IF E>53IF E>DIF E>FIF E>G P=2;Q=@(10);GOTO 151 

115 IF F>53IF F>DIF F>EIF F>G P=3;Q=@C11);GOTO 152 

116 IF G >53IF G>DIF G>EIF G>F P=4;Q=@C12);GOTO 153 

118 J=2 

1-19 FOR I = 1T0 4 u , 

120 GOSUB, 490+r 

1017 Macklyn Lane 
Bartlesville, OK 74003 

130 J=1 

131 D=D+RND C14)+(B-*(9)) 

132 E=E+RND C14 ) + ( 6 -@C10 ) ) 

133 F=F+RND (14) + C 6 -@<11 ) ) 

134 G=G+RND C14 )+( 6 -@(12 ) ) 

135 Z=25;GOTO 108 

150 CX=-20;CY=25;PRINT "WINNER";GOTO 1G0 

151 CX=-20;CY=9;PRINT "WINNER";GOTO 1G0 

152 CX=-20;CY=-10;PRINT "WINNER";GOTO 1G0 

153 CX=-20;CY=-29;PRINT "WINNER";GOTO 1G0 
1G0 IF @C13)=PG0SUB 201 
J,G1 IF @( 14 )=PGGSUB 202 

162 IF 15)=PGOSUB 203 

163 IF @C16)=PGOSU B 204 

164 NT=3;GOSUB 252 

165 GOTO 9 

201 @C 1 )=@C 1)+@(5 j + (@( 5 )bQ);RETURN 

202 @(2 )=@C 2)+@( 6 ) + C@( 6 )bQ);RETURN 

203 @C 3 )=@C 3)+@(7) + (@C 7)bQ);RETURN 

204 4 )=*C 4 j+S'C 8 ) + ( @>( 8 )bQ ); RETURN 


252 FOR A=1T0 1000;NEXT 

253 RETURN 

491 X=D; Y=25;GOTO 500 

492 X=E;Y=9;GOTO 500 

493 X=F;Y=-10;GOTO 500 

494 X=G;Y=-29;GOTO 500 






















STEREO 
.COLOR or&an; 

■LIGHT SHOW 

OW YOUR TV, 

, / INTERFACE 

A j/\ WITH B/U1Y. 


(olon. Onyan/Light Show: ln.ten.face Bally to any *teneo amp. 

'with, mute a powen of 1 wait on up. Will not effect *teneo equality 
TV display* in *tep with youn. ntenea mimic. 

Complele interface, unit with. caAAeite demon* tnation pnoyAom and 
in*tnuction* %2 ( ). 95 

Add youn. own favonite Ant/fjnaphijCA f C'C* 

11 apmen now available - All have full memo/iy uAeaye, lot* of ynaphic*, 
actcon and colon - any two (2/ pnoynam* on. ca**eite t with 
documentation $10.00 

I he ftlummy '* Tacoauac 
Ain Raia 

Ayatollah Dant Boand 
ffeAcue Ain. Dnop 
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Kill the Vulcan 
Sink the U-Boat 

Seanch & OcAtnoy 
Stan. Berne 2000 
The Black Layoon 
Hi* a ion OmpoAAibie 
Bombandien 
(hazy Ball 
Space Quent 2001 


FOR FR(£ (ATALOC, WRJT£: 


5 ftin.fcuAett* $ 1 . 0 * ea 

SOFTWARE 
8599 FRAMEWOOP. DT 
NEWBUR&H IN.47650 










When you’re through 
playing “Space Invaders” . . . 


PLAY “SILENT NIGHT” 
on your Bally Arcade! 

PRESENTING 3-PART 
ARCADE CHRISTMAS MUSIC 




to play 27 beautiful 
Christmas Carols in 3-part 
harmony, some with vibrato, 
Close your eyes and listen 
and you’ll think someone’s 
playing an organ! 


Just push: INPUT-GO and they all 
play consecutively. . 

All 27 programs on one tape .... Ip 



Send check or money order to: 


GEORGE mOSES CO. 


HO E. North St., Brighton, fTlI 48116 
(313) 227-1575 










ADS 


o FOR SALE Bally Arcade with Basic, Interface, 2 controllers, CLOWNS/BRICK¬ 
YARD, PANZER,BASEBALL,280 ZZAP, MATH. Coaxial or regular output, loads of 
documentation including all Arcadian newsletters. Works fine,seldom used. 

$175, Jay Hess, 52 Eaglehaven Ct. San Jose, CA 95 1 11- 408-227-8477 
o FOR SALE Complete Bally Arcade, includes 4 hand controls, BASIC,Interface, 
BASEBALL,CLOWNS,SEA WOLF, Manuals, Also line filter and custom carrying 
case. $300 or offer. Mark Stradinger, 331 Grove St. Fort Atkinson, WI 
53538 414-563-3452 

o SUPER SOFTWARE by Rob Rosenhouse has expanded its line of software into 
5 cassettes which include 2 programs each. Listings also available.Free 
RND (ART) program and descriptions for SAE, to Rob Rosenhouse, 44 Forestbrook 
Dr., North Plainfield, NJ 07060 

o W & W Software Sales,6594 Swartout Rd. Algonac, MI 48001. We have 9 tapes 
with 5 programs each, with or without listings. Or get listings only so you 
can pick and choose any of the 45 available programs. Excellent variety, 
color, graphics, use of hand controller, and much more. Games, business 
programs, and teaching aides for children and adults. Send 25^ for more 
information and a copy of Air Traffic Controller, or SAE for information only. 


BALLY APPLICATIONS SOFTWARE AND HARDWARE SOURCEBOOK 


A Sourcebook of software programs and hardware Items Is In the process 
of being prepared. It will follow the general format of the TRS-80 and ATARI 
Sourcebooks but will also Include hardware Items for the BALLY as well. 

The Sourcebook should be ready for distribution by November 31st. 

If you want to purchase a Sourcebook, please send a check for $2.50 
to Richard M. Houser 
635 Los Alamos Ave. 

Livermore, CA 94550 

Quantity discounts will be available. <10 or more copies to one address.) 

If you are a source of software programs and/or hardware Items please 
contact Richard Houser at (415) 447-8493 between 4:30 and 9:00 PM PST for 
further Information on how to get Included In the Sourcebook. 


o DUNGEONS and DRAGONS program package: Eight programs plus a search routine 
combine to generate characters, personalities, a randcm dungeon, the rolls 
of dice, etc. $8 postpaid on quality tape. R. Tietjens, 1008 Trinity #B, 
Seaside, CA 93955 

NEXT ISSUE will contain some explanations of the ratings scheme and 
discuss the statut of the other Projects. And we'll have some late word 
on the modem attachment to the Blue Ram. 


IO 


ARCADIAN 


Robert Fabris, relaxed 
3626 Morrie Dr. 

San Jose, CA 95127 
The Source TCD 959 
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)N/0FF SWITCH as a possible source of computer problems has been identified 
by a subscriber. The spring-loaded contacts may corrode and have momentary 
failures. The real solution is to solder across the contacts and disconnect 
the unit at the waif plug. You should be aware that there is always current 
in the unit as long as the wall transformer is connected. The switch only 
shuts off part of the continuity. 



CONTROLLER PROBLEMS . A number of subscribers have indicated problems with 
the hand controllers, especially in slots 3 and 4. If it is a problem only 
with the ports, then probably the I/O chip has a failure. Controller 
problems can usually be helped by cleaning. We have not been able to locate 
any controller source other than the list price outlets such as M.Wards. 

CLUB NEWS The Chicago Area Group (p.1 for address) is starting a software 
library for their members. 


RF MODULATOR is a gadget needed to convert the output of the Bally into a 
form usable by the TV set. One is included with your machine, it sits in the 
lower left corner and the shielded line going to your TV set originates there. 
Those of you who have purchased spare boards need one to get a visual display 
of what's going on inside the machine. Those I had last year are all gone, but 
I see the latest Poly Paks catalog has them for 1?.95. part no. 92CU652?. 

The illustration appear s to be identical to the Bally unit. 

BALCHEK There is a very small interest by subscribers for the Balcheck tool, 
which requires someone to bum the program into a 2716 chip. If anyone is 
thinking of doing this, let me know. 

GAME ENHANCEMENTS Virtually every program listed can be improved or modified. 
One designer has indicated that, for him, once the game has been made to oper¬ 
ate to a sufficient degree of difficulty, the interest in further programmin g 
is lost and he begins to look for a new programming challenge. Now is the time 
for the game player s to take over and revise the game to suit themselves. 


PRINTED MATERIAL - Over the past years, we have located various pieces of 
material that pertain to the Bally Arcade. We have also been fortunate enough 
to have some technical types who have done research into the machine and 
documented their findings. These items are available for the cost of printing 
and postage, and a list with some descriptive material follows: 
o SERVICE MANUAL PA-1 This is a Bally-produced slick cover item subtitled 
"Fun and Brains". It describes the mechanical disassembly of the Arcade box,the 
parts list, the parts layout, and a schematic diagam. I get these in batches 
from Bally, and usually have a stock on hand. Cost is $1. 

o SERVICE MANUAL PA-2 Also Bally-produced, it looks like PA-1 but the cover 
is a dull paper. It contains some not-useful data on the custom chips (clock 


rates and timing diagrams, but not enough/right kind to do the experimenter 
much good.) Also has a schematic. I do not stock this, I'm just listing it 
for the record. 

o EXECUTIVE SOFTWARE In essence, a listing of software that does something 
in the Bally and how to execute it. Tom Wood disassembled the on-board RCM, 
and provides us with his findings. Part of the document lists the RCM subrou¬ 
tines that are executed by an RST >8H instruction, while the second part 
contains the listings from 0000-1FFF. 2? pages, $2.50 


0 Robert Fabris, I 98 O 
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o HACKER'S GUIDE The Bally software design group made up a report of features 
not documented in the Bally BASIC instruction book. Virtually all of the data 
had been discussed in the first volume of the ARCADIAN before the release of 
this document as we discovered the features by experimentation. 21 pages, $ 2 . 
o MANUAL OF HARDWARE AND SOFTWARE The Bally software design group made up a 
large document explaining a number of subroutines, machine operations, and details 
of the interior workings, (it also contains the specifications of the custom 
chips, same as mentioned in PA-2 above). The second half provides the disassembly 
data for just about everything possible, including expanded on-board games data. 
The material is frustrating in that it occasionally discusses the "commercial" 
mode of operation - high resolution - that is only available with additional 
memory and a better operating system - capability beyond our current capacity. 

A shade over 300 pages, $ 30 . 

o BALCHEK A program was developed by the Bally software engineers which 
"looked at" the operation Qf the printed circuit board and determined if all was 
well, or if any problems existed. It would then identify the errant area. This 
program was placed into a 2716 chip and a couple of more parts added for a 
readout capability, and all boardiwould be inspected by this machine. Tcm 
Wood ran this through his disassembler and has provided us with the listing, 
to which I have added the instructions. 60 +pages, $ 6.50 
BALLY 

o BALLY BASIC Tom Wood again, this time with the Tiny BASIC cartridge taken 
apart - 63 pages, $ 6.50 


PROGRAM ENHANCB4ENTS occupy a goodly amount of space this issue. They have 
generally resulted from the material printed in Vol.2, pages 101,102, and 
page 4 of this volume. 

o To start with, on p. 101 we described machine code techniques that cause 
a blob to move back and forth on the screen - rapidly - without jerking or 
spoiling the picture also there, as an illustration of Blue Ram usage. Well, 
that clever mid-Westemer, Brett Bilbray, utilized the ideas presented there 
and invented the enclosed program which essentially does the same thing but 
uses Bally BASIC onl^. This means that those of you who don't have the Blue 
Ram as yet can see this interesting operation. 

o Next, Steve Walters used the identifier scheme mentioned on p. 102 and 
further discussed on p. 4 in conjunction with a no-memory storage scheme to 
get a nicer-appearing and more useful program. 

0 Dave Ibach explains how to do a few tricks with the tape loading 
schemes he outlines. 

o John Perkins reveals a few more secrtes about the ELue Ram memory 
addition, and has seme words about using the Blue Ram for BASIC storage. 

PROGRAM REVIEWS We have an on-going scheme to review programs submitted by 
persons wishing to sell them. The reviewers use a form (reduced copy is 
included in this issue), and then send me the summary that is included at the 
bottom of the form. I print the summary plus any other comments. 

USER GROUP is being attempted in the New Jersey area. Contact Rob Rosenhouse 
at 201-755-2289 in the evenings for more data and location/time, etc. The 
group will probably be a part of the Amateur Computer Group of NJ, that 
holds meetings at the Union County Technical Institute. 



















<RRCRDIRN 



BASIC-user interrupt service for Foreground/Background processing, by- 
Brett Bilbray with an assist from Dave Ibach, based on the Blue Ram 
program of page 101. Brett Bilbray 

FOREGROUND - BASIC operating 14430 Barclay 

BACKGROUND - Machine vector movement and writing - ■ - 

PROGRAM: 


Dearborn MI 48126 


10 CLEAR 
20 A=19584;B=A;C=640 
30 D= -9741; GOSUB C 
40 D=19518;G0SUB C 
50 D=18413;GOSUB C 
60 D= -8130;GOSUB C 
70 d=3539; GOSUB c 
80D= -1063;GOSUB C 
90 D=201;GOSUB C 
100 A=19680 
110 D=19683;G05UB C 
120 A= 19683 
130 D= -20275;GOSUB C 
140 D=-3296;GOSUB C 
150 D=296775GOSUB C 
160 D=19568;GOSUB C 
170 I>=28721 ; GOSUB C 
180 O=-2740;GOSUB C 
190 O=-10811;GOSUB C 
200 D=-87315GOSUB C 
210 D=-539; 00 SUB c 
220 D=-9243;GOSUB C 


230 D= 12828; GOSUB C 
240 D=19770; GOSUB C 
250 0=255; GOSUB C 
260 0=6151 ; GOSUB C 
270 D= 16205; GOSUB C 
280 0=19768; GOSUB C 
290 D= 19744;GOSUB C 
300 0=6151 ; GOSUB C 
310 0=589; GOSUB C 
320 D=-7683; GOSUB C 
330 D=-7715; GOSUB C 
340 D=- 11 807; GOSUB C 
3500= -3647; GOSUB C 
360 d= 31725 ;gosub c 

370 0=19568; GOSUB C 
380 D=-13829; GOSUB C 
390 A=19736 
400 0=14367; GOSUB C 
410 0=9293; GOSUB C 
420 0=2125; GOSUB C 
430 A=19744 
440 D=-26624; GOSUB C 


450 0=16384; GOSUB C 
460 0=0; GOSUB C 
470 0=2050; GOSUB C 
480 D=-24566; GOSUB C 
490 O=-30685; GOSUB C 
500 0=-21846;GOSUB C 
510 0 =-22846; GOSUB C 
520 0=8200; GOSUB C 
530 0= 2080; GOSUB C 
540 0=8200; GOSUB C 
550 0=0; GOSUB C 
560 0=-32735; GOSUB C 
570 D=1280; GOSUB C 
580 0=0; GOSUB C 
590 0=768; GOSUB C 
600 0 = 5 ; GOSUB C 
610 0=0; GOSUB C 
620 0=3; GOSUB C 
63 O CALL (B): STOP 
640 $(A)=d; A=A+2; RETURN 


By just inputting the above program, you will be able to use the BASIC 
while at the same time the object (generated by the program) will move 
about the screen^t a speed controlled by KNob #1. 

DATAMAX UV-1 Zaras s Universit y Machine " is the current name for the new 
Bally product mentioned here on p.84 of Vol 2. I understand that Bally 
builds the pieces and Datamax ( 35 O N. Eric Dr. Palatine IL 6 OO 67 ) then 
assembles and markets it. The latest specs include: a Z80 microprocessor; 

16K Screen Buffer RAM; 16 k ROM that includes the ZGrass language; 32 K 
of user development RAM. 2 DC motor controllers (tape machine, movie or 
tv camera,etc.) 2 RS232 output ports for peripherals; disc drive interface; 
audio tape interface; and a card rack, allowing addition of other items. 

All of that plus more at 2495* Add a 13" color monitor at 695. This machine 
has been in development for the past couple of years, with the close 
cooperation of Dr. DeFanti of the University of Illinois who utilizes 
the Bally Arcade in his classes. 

BYTE Magazine , in the November issue, has an article written by Dr. DeFanti 
which I found very interesting as it has a bit about the early history of 
the Bally. 

REVIEWS OF OTHER COMPUTERS are requested from time to time. If you have 
access to one or another of the popular home computers and feel that you could 
write an honest comparison with the Bally, please let me know. This would be 
something to have done by mid-Summer, and I've a few ideas on format so that 
one could make some reasonable judgements by looking at a chart, table, etc. 
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Blue Ram Programming Tutorial. Many questions have arisen 
concerning the procedure for actually running programs written 
into the Blue Ram in machine code. Once a program (such as the 
one on page 101 of the ARCADIAN) has Been entered into the Blue 
Ram via the Utility, how is it actually made to run? The RUN 
statement is used to run BASIC programs while the CALL statement 
is used to run machine code programs or routines. If the program 
in the Blue Ram was entered beginning at 6000H then a CALL 24576 
will start that program running. Similarly, a program entered at 
6100H can be run by the statement: CALL 24832 GO. The program on 
page 101 was entered beginning at 6000H, so a CALL 24576 GO will 
start it running. Note that the Blue Ram Utility has two means 
within it for running machine code programs: "GOSUB " followed by 
a four digit hexidecimal address will run a machine code program 
beginning at that address. Therefore, after entering the program 
on page 101, enter: GOSUB 6000 and the program will run. A GOSUB 
6C00 will also run a program beginning at 6000H. The primary 
difference between GOSUB 6000 and GOSUB 6C00 is that a more complex 
program can be written and run using the GOSUB 6C00 entry because 
there is a routine at 6C00 in the Blue Ram (with the Utility 
loaded) that performs some special housekeeping of the Z80 registers 
to prevent the machine code program from upsetting the BASIC 
environment and clobbering the BASIC program. The GOSUB xxxx 
entry is a special form accepted by the Utility and it will not 
work from within a BASIC program. To run a machine code program 
from a BASIC program, the CALL nnnnn form must be used. In this 
case, nnnnn is the decimal equivalent of the hexidecimal address. 
24576 is the decimal equivalent of 6000 hexidecimal. There is a 
conversion feature in the Blue Ram Utility that was inadvertantly 
left out of the documentation: The left square-bracket C can be 
entered while the Utility is running, followed by a four digit 
hexidecimal number and the Utility will print the decimal number 
equivalent. If less than four digits are used, press GO following 
the last digit to evoke the printout. This is especially useful 
when writing a machine code program at address 6450, for example, 
and then wondering how to run it from BASIC. The Utility would 
show C64503 = 25680 meaning that the machine code program at 
6450H can be run by the statement: CALL25680 GO. 

Blue Ram BASIC? Most Blue Ram owners are not adept at machine 
code programming, the major forte of the Blue Ram. Therefore we 
are investigating ways in which BASIC programmers and hackers can 
use the Blue Ram for BASIC program enhancement without having to 
learn any machine code. The Blue Ram owner’s manual describes 
the procedure for using the Blue Ram memory for extended strings 
i.e. the ^(nnnnn) statement, however there are two other ways a 
non-machine code programmer can extend a BASIC program. The 
first way consists of loading "service routines" into the Blue 
Ram through the Utility and then CALLing them from within the 
BASIC program. It is not necessary to understand how the service 
routine works, only how to call it. The calling sequence may 
require certain variables to be set up prior to the call and/or 
certain variables may be returned. Another fascinating possibility 
uses routines in the Blue Ram to extend the repertoire of BASIC 
statements and functions. Examples of both kinds of routines are 
given at the end of this paragraph. The second method for using 
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the Blue Ram in conjunction with BASIC programs is to enter some 
of the BASIC program into the Blue Ram and execute it from there. 
Up to 4219 additional bytes of program can be written this way 
for a total program length of over 6000 bytes (characters). The 
first step is to divide the overall program into two parts, one 
part for the normal 1800 byte BASIC memory and the other part for 
the Blue Ram. There are some restrictions on the Blue Ram part 
so plan the division very carefully. The following restrictions 
apply to Blue Ram BASIC program parts. 

1. Direct GOTO snd GOSUB cannot be made to Blue Ram program 
parts. Instead, an indirect linkage must be defined. In the 
normal BASIC part the linkage takes the form: CALLnnnnn where 
nnnnn is the decimal equivalent of the beginning address of the 
Blue Ram linkage part. The Blue Ram linkage part requires four 
bytes: 11 hh hh C9 where hh hh is the hexidecimal address of the 
beginning of the Blue Ram program part being linked to. Note that 
the hh hh is in reverse byte order. Example: 

10 CLEAR ;CALL24576 
20 PRINT "ALL DONE" 

6000 11 04 60 C9 3B 74 22 

6007 54 48 49 53 20 4D 45 

600E 53 53 41 47 45 20 49 

6015 53 20 46 52 4f 4d 20 

601C 54 48 45 20 42 4C 55 

6023 45 20 52 41 4D 22 3B 

602A 6 e 32 30 0D 

The contents of the Blue Ram part, after the linkage, is the 
ASCII equivalent of the BASIC statement: 

;PRINT "THIS MESSAGE IS FROM THE BLUE RAM";GOTO 20 

An editor for entering characters directly into the Blue Ram is 
being developed by Perkins Engineering to avoid having to cope 
with linkage programs and ASCII translations. The Blue Ram part 
will be entered, via the editor, in much the same way as Bally 
BASIC now accepts program statements. 

2. Blue Ram statements are considered extensions of the 
statement which CALLS them. Therefore each such Blue Ram part 
statement CALLed from the normal BASIC part must begin with a 
semi-colon ; as a separator just as with any compound BASIC 
statement. 

3. All transfers to Blue Ram program parts are via the 
CALLnnnnn statement. Instead of GOTO 2000 therefore, a CALL to 
24576 is used. Where it is desired to reference a Blue Ram part 
as a subroutine, a dummy subroutine must be created in the normal 
BASIC part. The dummy subroutine will then transfer to the Blue 
Ram part. The Blue Ram part will contain the body of the sub¬ 
routine as well as the RETURN statement. For example: 

10 GOSUB 200;STOP 
200 CALL24576 

;PRINT "THIS IS A BLUE RAM SUBROUTINE";RETURN 

The last "PRINT" statement is the example subroutine in the 
Blue Ram. 
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BASIC program part: 
Blue Ram program part: 










^^RCRD IRM 

* * * / /'*’ 

4. Line numbers have no meaning and cannot be referenced 
to access the Blue Ram program parts. However, since BASIC 
expects a line number after each "line" of program, pseudo line 
numbers must be used for multiple line Blue Ram program parts. * 
For example: 

;PRINT "THIS IS THE FIRST LINE" 
xxPRINT "THIS IS THE SECOND LINE" 
xxFOR N=1T0 20;PRINT N,NxN;NEXT N 

The xx at the beginning of each additional line is a two 
character filler used to take the place- (and space) of the 
normal line number. This must always be two characters and 
must always be present although thie choice of characters is 
arbitrary. If ASCII numbers are used, they will be of more 
meaning in the listing. The editor being developed will include 
facilities for applying these pseudo line numbers and for 
dumping and loading the Blue Ram program parts as well as listing 
those parts. Bally BASIC will not directly acknowledge the Blue 
Ram program segments when performing normal :PRINT ;LIST or LIST 
functions. However, for experimenters, the following statement 
will render a listing of Blue Ram program parts entered in ASCII 
via the Blue Ram Utility: 

FOR N=(first address) TO (last address);TV=$(N);NEXT N 

The Blue Ram Utility can be used to dump these program parts to 
tape just as if they were machine code segments. 


A Service Routine Library is underway and routines are solicited 
from anyone who can provide machine code and documentation for 
such routines. The routines should be of a general usage nature 
and fully documented in terms of what they do and how to CALL them. 
Initial allocations for the service routines will begin at address 
6D00 (27904 decimal) and progress upward until that area is full. 

We will then start on another area. Of course not all routines 
need be loaded at once. The following are three candidate service 
routines to begin the library: 


6D00 CD OF 6D 4E 06 00 D3 These two routines allow access 

6DO7 CO ED 43 70 4E D3 40 to up to 3072 half-size strings, 

6D0E C9 21 FF 6B ED 4B 6E where each string entry can 

6D15 4E AF ED 42 C9 CD OF contain a positive number from 0 

6D1C 6D 3A 70 4E 77 C9 to 255 or a character. The string 

entry number is set into A and the 
contents of the string is set into or retrieved from B. Example: 
A=l4;B=QxN;CALL27930 stores the product of Q and N in half-string 
entry #14. FOR A=0T0 20;CALL27904;PRINT B;NEXT A will print the 
contents of the first 21 half-string entries. CALL27930 stores the 
contents of B into half-string entry A. CALL27904 fetches the 
contents of half-string entry A into B. 


6 D22 

21 

70 

4E 

06 

FF 

13 CD 

6D29 

CF 

2F 

FE 

3B 

28 

04 FE 

6D30 

0D 

20 

07 

26 

00 

68 

22 

6D37 

6e 

4E 

C9 

CB 

74 28 

E9 

6D3E 

04 

BE 

20 

E5 

26 

00 

18 

6d45 

El 








This routine compares the value 
in B with a list of possible 
matching characters and returns 
the matching list entry number 
in A. If no match is found, a 
number one larger than the list 
size is returned. The list is 


1<3 
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placed in the statement immediately after the CALL address. For 
example: CALL27938,AXJKPTZ$ causes the value in B to be 

compared against the possible choices: "A", "X", "J", "K", "P", 
"T", and "Z" (the ASCII values of these letters not the contents 
of the variables) and sets A to the number of the match if any. 
Suppose that B contained the character "K". The value returned 
in A would be a 3 because the letter "K" was the number 3 entry 
in the list beginning with 0 for A, 1 for X, etc. If B had 
contained a value not in the list, say "Q" for example, the 
number returned in A would be 7 * one more than the last entry m 
the list. The comma after the address 27938 is a required 
separator and is not considered part of the list. The dollar 
sign at the end of the list is the list terminator and is also 
not considered part of the list. Any character may be used as the 
terminator but the list must contain the terminator for proper 
operation of the service. The list may be of any length within 
the normal limits of statement length. Here is a more complex 
example: 


10 FOR C=0T0 7 

20 B=KP;TV=B 

30 CALL27938,MARY D0E$ 

40 IF A=C NEXT C;STOP 
50 PRINT "ERROR";G0T0 10 


This example tests for the 
exact entry at the keyboard 
of the name MARY DOE. If any 
error is made along the way, 
the word ERROR is printed and 
the sequence is tried again. 

By omitting the TV=B statement in line 20, this could be used 
as a secret password identifier. Only an exact spelling will 
pass. If you try to write a conventional program to do the 
same thing you will quickly see what a savings this service can 
be. And remember, routines in the Blue Ram are not lost during 
a RESET operation so these services can be kept on-line just like 
Bally BASIC. The same is true for Blue Ram BASIC program parts. 


BLUE RAM NEWS. The next issue of the ARCADIAN will herald the 
arrival of the Blue Ram Modem Interface which is used to connect 
the Blue Ram to a Livermore Data Systems STAR modem. The modem 
an d iriterface combination allows telephone communications between 
Bally owners, with local Computer Bulletin Boards, and with the 
mind-boggling world of the Source. A prototype of the modem 
interface has been working for over a month now and all that 
remains is pinning down the options and parts suppliers. A 
special communications program is in development which tailors 
the interface protocol to the Source formats and includes a 3 x 5 
character set for a screen format of 40 characters by 14 lines, 
similar to APPLK's format. Also, a parallel interface to the 
Base,-, Model 800B printer is being considered as part of the modem 
interface to allow hardcopy printouts of text communications. 

The STAR modem is available from several dealers at $139. 


Please feel free to contact John Perkins with any technical or 
engineering or other questions concerning the Blue Ram or its 
support devices and programs. (804) 428-9092 Source ID TCV403. 


CORRECTION to ADDITIONAL BASIC FEATURES on page 102. The two 
bytes (m) and (n) are backwards in the calculation which should 
read (n)x256+(m). This will change the numbers on the last line 
to 770 vice 515 resulting in: :INPUT 770 or :LIST 770. 
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BLUE RAM PROGRAM. New capabilities of the Bally Arcade with the 
Blue Ram add-on was the program topic at a recent meeting of the 
Tidewater Computer Club at Norfolk, Virginia. John Perkins of 
Perkins Engineering presented practical home uses of the Bally 
and the following accessories developed by Perkins Engineering: 

Blue Ram, Keyboard, Modem interface, BSR controller interface, 
and Music compiler. Inputs were made easily with the keyboard, 
complete with the fancy features of N-KEY ROLLOVER, REPEAT, 

CONTROL CHARACTERS, etc. 

The BSR, a popular home device controller, was operated via the 
controller interface by the Bally executing a demonstration 
program. A lamp was controlled by the BSR, and, while the club 
watched, the lamp flashed on and off and slowly dimmed and 
brightened as the Bally processed a time table set of instructions. 
We discovered how convienent and perhaps economical it would be 
to control automatically the hours certain home devices are 
turned on and off. 

Next, we listened with pleasure to several Bally compiled 
musical selections from Bach and Handel in three part harmony. 

It was explained that the compiler is used to translate a 
person's own composition or regular sheet music into a form that 
is played by the Bally. 

Then, a quick phone call connected the Bally (with modem) to the 
Source , using the modem interface. The Source is a nationwide 
communication/information sharing network. Previous club programs 
demo'ed the Source , but never was such realtime excitement 
generated. First of all, everyone was able to read inputs/ 
responses in large print on the T.V. Secondly, as we sampled the 
smorgasbord of Source information, a New Hampshire computer 
group broke in, wanting to "chat" with usl Well, when they 
discovered we were communicating via a Bally Arcade, we read 
across the screen, "YOU'VE GOT TO BE KIDDING." . 

Yes, Bally Arcade and Perkins Engineering brought us (and New 
Hampshire) some surprises that night! 

P.S. Bally users are in a majority at club meetings, and new 
Bally users are invited to attend bimonthly at ECPI, Stanwick 
Building. 

Karen P. Cravedi, VEEP 
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.MASTERMIND 
-BY BOB WISEMAN 
:RETURN ;NT=1;CLEAR 
BC=6;FC=0 

PRINT ;PRINT "THE GAME OF MASTERMIND';PRINT 
PRINT 'COLOR CODES:* 

R=1200;GOSUB R;PRINT *R=RED G=GREEN' 

GOSUB R;PRINT '0=0RANGE E=BLUE' 

GOSUB R;PRINT 'Y=YELLOW P=PURPLE' 

M=0 

FOR N=1T0 4;@CN)=RND (6);NEXT N 
PRINT 'YOUR MOUE' 

M=M+1 

IF M-10GOTO 1000 
FOR N=4bM+lT0 4bM+4 
G=KP;TU=G 
IF G=81G0T0 1000 
IF G=89BC=126;e(N)=l;G0T0 400 
IF G=82BC=98; @>C N )=2; GOTO 400 
IF G=71BC=155;@(N )=3;GOTO 400 
IF G=80BC=43; @( N >=4; GOTO 400 
IF G=79BC=110;@(N)=5;GOTO 400 
IF G=66BC=249;@(N>=6;G0T0 400 
TU=31;TU=63;TU=31;GOTO 240 
NEXT N 
B=0;W=0 
FOR Z=1T0 4 
P=Mb4+Z 

IF #(P)=ecZ)B=B+l;@(P)=@CP}+14;e(Z>=eCZ)+7 
NEXT Z 

FOR Z=1T0 4;P=Mb4+Z 
FOR N=1T0 4 
IF Z-NGOTO 470 
IF @(N)*@(P)GOTO 470 
@(P)=@(P>+14 
@(N)=@CN>+7 
W=W+1;GOTO 500 
NEXT N 
NEXT Z 

FOR N-1TO 4;IF N)>6@(N)=@(N ) 

NEXT N 

PRINT *4,B,' BLACK',*2,W,* WHITE 
Z=10bB+W;NT=0 


Bob Wiseman 

118 St. Andrews Dr. 

Cincinnati, OH 45245 


In this version of MASTERMIND, the 
computer holds a four-color code 
that you must guess. Enter the first 
letter of each color guessed via the 
keypad. Each BLACK response means a 
correct color in the correct spot, 
while a WHITE response means a cor¬ 
rect color in the wrong spot. 


FOR N=-ZTO 1STEP -1 
&(22>=-32700 
&C16)=Nb2;NEXT N 
&C16)=0;NT=1 
IF B<4GOTO 195 
PRINT ’YOU WIN* 

NT=0;FOR Z-400TO 15TEP 
&(22>=-32760 
&(16 >=Z;&(17>=Zc2 
NEXT Z;NT=1 


IQ 


S35 &(22 >=0;&(16 >=0;&(17 >=0 
940 A=KP;GOTO 10 
1008 PRINT 'TOO MANY TRIES 
1002 FOR Z=1T0 400STEP 4 
1004 &(22>=-32760 

1006 &(16)=Z;&(17)=Zc2;&(18 >=Zcl0 

1008 NEXT Z 

1009 &C 16 >=0: 22 >=0; &( 17 )=0;&C 18 >=0; NT=1 

1010 PRINT 'THE CODE WAS:* 

1020 FOR N=1T0 4 
1030 Z =$(N > 

1040 IF Z-1PRINT 'YELLOW ', 

1050 IF Z-2PRINT 'RED *, 

060 IF Z-3PRINT 'GREEN ', 

1070 IF Z—4PRINT 'PURPLE ', 

1080 IF Z-5PRINT 'ORANGE *, 

1090 IF Z-6PRINT 'BLUE ', 

1095 NEXT N;A=KP;GOTO 10 
1200 CX=-50:crTURN 
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PROGRAM TITLE & INSTRUCTIONS 
WITHOUT USING MEMORY 


Bally Basic 


By: Steve Walters 


556 Langfield 
Northville, MI 48 



Bally Basic programs, especially games, are nicer for the user if a title and 
operating instructions appear on the screen to start the operation. This lets 
the tape be loaded and used by a new player without having to refer to a paper 
instruction sheet. However, there is often a frustrating trade-off between 
the program instructions we would like to display, and the memory capacity we 
finally need for a good operating program. 

The procedure described below will allow you to display a title at the beginning 
of the tape load, and up to nine lines of title and/or instructions at the end 
of the tape load, without using any memory space. The specified input command 
(e.g., :INPUT 2) is used to control this process. 

Loading the program . When the operating program is ready to store permanently onto 
tape, set NT=1 (type in NT=1 and press GO). Then enter the following: 


:PRINT; TV=0; TV=1; PRINT; PRINT "PROGRAM TITLE"; PRINT "BY PROGRAM AUTHOR" 
PRINT; LIST; PRINT; PRINT "STANDBY-"; PRINT; PRINT ":RETURN; : INPUT 2" 


Do not press GO at this point. With the above entered, start the tape recorder on 
record, and when the leader has gone by press GO. You will see ?? which are the 
TV numbers for the input number command, followed by the title and author, then 
the normal program listing, then STANDBY-, and then :RETURN; :INPUT 2. As soon as 
this last statement appears on the screen, turn the tape recorder off without 
entering anything else, and leave the tape cartridge at the position at which it . 
was turned off. 

The following should be noted in using the above procedure: 

(a) the TV instruction shown is an example, since TV=0; TV=1 sets up an 

input code which will input only on the instruction :INPUT 1 (see ARCADIAN 
page 102). Use whatever TV code you want for your program input instruction 

(b) put whatever information you want in the PROGRAM TITLE and PROGRAM AUTHOR 
lines, within the limit of the buffer space. If the keypad entry locks 
out on you before, you have entered the above material, then you have put 
too many characters in these two lines. 

(c) the last instruction .-RETURN; :INPUT 2 closes the 10 port and then waits 


to re-open it when it finds the proper TV input code. The above sample 
uses 2 as an example. If more than one program is included on a tape, 
both of the input codes for each program should be unique values, used 
only once, on the tape. 


Loading the message . A separate program is now used to load the message onto the 
tape which you want to appear after the program load but before the program 
operation begins, such as the title and playing instructions. Press RESET to clear 
out the operating program, and then enter the following: 


20 
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10 CLEAR 
20 TV=0; TV=2 
30 PRINT; PRINT 
40 PRINT “.PROGRAM TITLE" 

50 PRINT ".PROGRAM AUTHOR" 

60 PRINT " ********************" 

70 PRINT "! INSTRUCTIONS" 

80 PRINT ".INSTRUCTIONS" 

90 PRINT ".INSTRUCTIONS" 

100 PRINT ".INSTRUCTIONS" 

110 PRINT ".INSTRUCTIONS" 

120 PRINT ".TO START PUSH KEY 1" 

130 PRINT ":RETURN; NT=0; BC=133; K=KP; GOTO 1 


(this should correspond to the value in the last 
statement of the program load sequence) 

(each line of message should contain no more than 
23 characters/spaces after the period) 


(see note a) 
(see note b) 


All message lines (Line 40 thru Line 110) must be used to fill the screen and scroll 
unwanted material out of sight. If you do not need all the lines, or want 
spaces between parts of the instructions, write PRINT only in that line. 


When the message loading program is ready to record onto the tape, enter :PRINT; RUN 
without pressing GO. Then start the tape on record and press GO. As soon as the 
material in Line 130 appears on the screen, turn the tape recorder off without 
entering anything more. 


The tape is now ready to input and display the message. 


(a) Line 120 is based on the key-press in Line 130 being used to start the main 
program operation. This requires no memory space. However, I usually prefer 
to have the hand controller operate everything if possible, which requires 
a line in the operating program, as follows: 

(1) change Line 120 in the above message program to 

120 PRINT ".TO START PULL TRIGGER" and eliminate K=KP in Line 130. 

(2) add this line to the operating program: 

1 BOX 0,-32,159,7,2; IF TR(1)#1 GOTO 1 

The BOX instruction is not necessary, but it blanks out the material 
which was printed by Line 130 in the message program, for a nice 
screen display. Line 1 in the program simply loops on itself while 
the player is reading the message, until he pulls the trigger. 

A CLEAR instruction will probably be needed at the next operating 
line. 


(b) Line 130 contains some items as examples. If you need NT set at a specific 
value, or a color set, a value set (e.g., A=200) or other item once at the 
beginning of the operating program, it can be done as part of Line 130 without 
using program memory space. Be careful about the length of Line 130, since 
it will cause the message to scroll out of sight if it is too long. You could 
use two lines for this if needed. 
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.MONTH NAMES 



PRINT ".JANUARY", ; RETURN 
PRINT "FEBRUARY",;RETURN 
PRINT "MARCH",;RETURN 
PRINT "APRIL", ;RETURN 
PRINT "MAY",;RETURN 
PRINT "JUNE",;RETURN 
PRINT "JULY",;RETURN 
PRINT "AUGUST",;RETURN 
PRINT "SEPTEMBER",;RETURN 
PRINT "OCTOBER", ;RETURN 
PRINT "NOVEMBER", ;RETURN 
PRINT "DECEMBER",;RETURN 


.DAY NAMES 

PRINT "SUNDAY",;RETURN 
PRINT "MONDAY", ;RETURN 
PRINT "TUESDAY",;RETURN 
PRINT "WEDNESDAY",iRETURN 
PRINT "THURSDAY",;RETURN 
PRINT "FRIDAY",;RETURN 
PRINT "SATURDAY", ;RETURN 


.ERROR MESSAGES 


PRINT;PRINT " INVALID MONTH!! 

PRINT " 1 TO 12 ONLY PLEASE!! 

FOR C=i TO 450;NEXT C;CLEAR;PRINT;GOTO 40 
PRINT;PRINT " INVALID DAY!! ", 

GOSUB 600+M 

PRINT;PRINT #3," HAS ONLY", N, " DAYS!!";GOTO 80 
PRINT;PRINT " INVALID YEAR!! 

PRINT " 1583 TO 9999 ONLY PLEASE! 

PRINT;GOTO 100 

PRINT;PRINT " INVALID DATE!! 

PRINT;PRINT #6,Y," IS NOT A LEAP YEAR!! 

GOTO 830 


o Sound Quality Enhancement - Here's a full range of sound from your 
B« lly with the Sound System I Audio Add-on. Connects to expansion port; 
cj ble and connector included. Features 4-8 ohm speaker output, 2 pre-amp 
outputs, headphone jack, on/off volume control, and 117v operation. Advise 
if you have a Blue Ram. Only $28, wired and tested, plus $3 postage/UPS. 
o Heavy duty power supply to replace the Bally wall transformer. All steel 
cabinet construction with on/off switch and indicator light plus an easy- 
to-replace fuse output. Line cord. Bally power connector. $24 wired, plus 
$3 postage/UPS Alternative Engineering, 1 Gilbert Dr. Chelsea,ME 04330 
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TUTORIAL: TAPING MEMORY 

by Dave Ibach 


Here is an alternate way to put your program on tape: 

Dave Ibach 

>A--2M57b 19553 Dartmouth PI. 

> B=*-C200S0} Northville, MI 48167 

>PRINT B 

nnnnnn -*use it here - 3 , 

> NT =1 i : PRINT =i PRINT PRINT *A = -2457b=, B=nnnnnni 

FOR N=A TO Bi^-CN}=KPnNEXT N i/J-C20050> = B i 

: RETURNS RUN' 7 iFOR N = A TO BiCY = MDi TV=^-CN}i 

NEXT Ni:RETURN get tape moving then press GO 

The program can be loaded from tape to memory by using the 
standard :INPUT command- 

Why would you want to do it this way? First 1 the program 
doesn^t list on the screen during loading. If you have a 
program that holds surprises for those who playn such as the 
printing of clever remarks! you might not want to reveal the 
program listing during loading. 

Second! you can easily include the contents of the string 
variable with this approach. Do it this way: 


>A=-2457b 

> B = *-C200S0} 

> C=B+2x-Cthe number of string variables desired 

including <§K 0 >} 

> PRINT B 


nnnnnn 

> PRINT C 

mmmmmm 

> NT=1 


►use it here 


—^ use it here - 


1 


>:PRINTtPRINT ^PRINT *A=-24S7LnC=mmmmmmi/ 
FOR N=A TO Ci/l-CN}=KPn NEXT N^-C2D0S0}=nnnnnni 
:RETURNiRUN v ^FOR N = A TO Cn CY=M0'-, TV=*{ NI i 
NEXT Ni:RETURN get tape moving then press GO 


A third reason for taping your programs in this fashion 
is to save memory. The remainder of this tutorial will explain 
how- 

In your program! you use statement numbers for three reasons: 

1. As the object of a GOTO or GOSUB 

2. To terminate the scope of an IF statement 

3. The input buffer doesn^t allow a statement to 
be greater in length than 102 keystrokes. 


Each time you are constrained by you are throwing away 

two memory locations. In addition! if you are storing data in 
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the first few lines -Cas George noses does in his music tapes]-! 
it can be particularly annoying to have to deal with statement 
numbers that recur too frequently. To get rid of these 
extraneous statement numbers: 

1. Hake a handwritten list of the statement numbers 
that exist for this reason. 

5. Rewrite each one of these statements inserting a 

semi-colon after the statement number. This is done 
so that we can concatenate the text to the previous 
statement. This step is unnecessary for data lines.* 

3. Squeeze out statement number x like this: 

/ 

> FOR N=-2457Li TO OilF *-CN}*xNEXT N 

> FOR I=N-1 TO -22775STEP 2i 5'-CI> = ^{I + 3}i NEXT 1=, 
^-C2U05D>=/£-C2U050}--3 

Hint: to avoid the tedium of doing step 3 repeatedly! make these" 
the first two statements of your program! even if you have to 
borrow the space by temporarily eliminating other lines: 

1 INPUT *STNT * TO ELIlilNATEf^AiFOR 
N=-2457b TO D^IF *CN>»A NEXT N 

2 FOR I=N-1 TO -2277SSTEP 2iX-CI}=5£-CI+33-i NEXT 1} 
/if2D0SD}=/if2DDS0>-3i STOP 

Now simply RUN once for each statement number you wish to 
eliminate. _ 

4. Et voilan it^s donerf If you followed the previous 
hintn take out lines 1 and 2 and restore any lines 
you may have temporarily removed. 

Now your program is listablen executable! and smaller in 
size. PRINT SZ if you are skeptical- 

But you can-'t write it to tape and reload using the 
normal technique! because some of the statements are now too 
big for the buffer. You-Hl have to write it to tape using 
one of the techniques given at the beginning of this tutorial. 
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HORSERACE by Paul Slezak 



GOTO 10 

15 GOSUB 290 


20 CLEAR ;CX=-20;PRINT "RACE #“,;PRINT #1,N;T=0;S=0;GOSUB G00 

30 FOR Z=1T0 8;PRINT #2,Z,;@CZ+8)=RND C5)+RND <3 )+l;CX=38;PRINT #1,@CZ+8),;CX= 
45;PRINT ":1",;CX=-S0;GOTO 30+Z 

31 PRINT ”ALBADEXTER”;NEXT Z 

32 PRINT "JO L IN";NEXT Z 

33 PRINT "C BICUSPID";NEXT Z 

34 PRINT "SEATLE SLEWED";NEXT Z 

35 PRINT “WOMAN 0'WAR";NEXT Z 
3G PRINT "DUSTY PAUL";NEXT Z 

37 PRINT "DIABLO";NEXT Z 

38 PRINT "SECRETARYLESS";NEXT Z 

40 FOR Z=1T0 A;IF @(Z+20)=0@(Z+1G)=0;NEXT Z;GOTO 100 

50 CY=-32;PRINT ’PLAYER PRINT #1,Z,;CX=-20;INPUT B;CY=-32;CX=10;INPUT C 

G0 IF B >0IF B<10GOTO 80 
70 GOTO 50 

80 IF C>@(Z+20 )CY=-32;PRINT “SORRY,I'M NO LOAN SHARK“;GOSUB 610;CY=-32;FOR D=1 
TO 23;PRINT " “,;NEXT D;CX=-78;GOTO 50 

90 @(Z+16)=B;@(Z+20)=@(Z+20)-C;@(Z+24)=C;NEXT Z 
100 FC=160;NT=5;PRINT "14G 641 G41 G41000000";CLEAR ;NT=0;FC=155;CY=35 

110 FOR Z=1T0 10;CX=70;GOTO 110+Z 

111 PRINT ”X“;NEXT Z 

112 PRINT “X";NEXT Z 

113 PRINT "F";NEXT Z 

114 PRINT “ I"; NEXT Z Paul Slezak 

115 PRINT ”N“;NEXT Z 1818 S. 59th Ave 

11G PRINT "I";NEXT Z Cicero, IL 60650 

117 PRINT “S“;NEXT Z 

118 PRINT “H";NEXT Z 

119 PRINT “X“;NEXT Z 

120 PRINT "X";NEXT Z 

130 CY=25;FOR Z=1T0 8;PRINT #2,Z,;CX=-60;PRINT ":“;NEXT Z;GOSUB G10 
140 CY=25;FOR Z=1T0 8;CX=-G0;PRINT “..";NEXT Z 

150 NT=1;&(20 )=50;&(21)=205;FOR Z=1T0 35;MU=“U“;NEXT Z;NT=0;&(20)=0;&(21)=0;CY= 
25;FOR Z=1T0 8;PRINT " “;NEXT Z ‘ ... , 

155 CY=0; PRINT “..AND THEY'RE OFF!!“;GOSUB G10; CY=0; PRINT “ H 

1G0 GOSUB 610 

170 CY=25;FOR Z=1T0 8;Z)=@( Z)+< (RND (4)+8+RND (5))-CRND (@CZ+8))));CX=@<Z);PR 
INT #1,Z;IF @(Z)>65S=1 
175 NEXT Z;GOSUB 610 
180 IF S=lGOTO 200 
190 CY=25;GOSUB 620;GOTO«160 

200 G=0;FOR Z=1T0 8;IF G>@CZ)NEXT Z;GOTO 220 
210 X=Z;G=@(Z);M=@(Z+8);NEXT Z 
220 B=0;FOR Z=1T0 8;IF @CZ)>65B=B+1 
230 NEXT Z; IF BMGOSUB 500 

240 CLEAR ;CY=0;PRINT “THE WINNER IS #",;PRINT #2,X;G0SUB 610 
250 FOR Z=1T0 A;IF @(Z+16)=X@(Z+20)=@CZ+24)bM+@<Z+20) 

260 NEXT Z 

290 CLEAR ;CX=-30;PRINT “YOU HAUE" 














30 FOR Z=TTO fl; PRINT "PLAYER #",;,PRINT #1,Z,;PRINT #2,” $“,;PRINT #2,@(Z+20);N 
EXT Z ' 

310 FOR Z=1T0 3000;NEXT Z 
320 IF N>8G0T0 400 
330 N=N+1;IF N?0GOTO 20 
340 RETURN 

400 CLEAR ; FC=79; BC=82; CY=16; CX=-35; PRINT "RACES OUER!!"; PRINT -.PRINT 
410 PRINT “IF YOU WANT 9 MORE RACES PRESS 1“;A=KP;IF A#49ST0P 
420 GOTO 5 

500 FOR Z=1T0 G;CLEAR ;FC=212;BC=209;CY=0;CX=-35;PRINT "PHOTO FINISH’;NEXT Z;BC 
=160;FC=155 
510 RETURN 

600 FOR Z=1T0 8; @( Z)=-78;NEXT Z;RETURN 
810 FOR F=1T0 300;NEXT F;RETURN 

620 FOR D=1T0 8;CX=#tD);PRINT " ”;NEXT D;RETURN 
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REVIEW FORM i^shown below. This will give you the code for the various 
numbers used and the categories. 

BALLY PROGRAM REVIEW 


Date J_ 

Name of ProSr; 
Description:_ 

Source._ 

Reviewed byl_ 


Circle 


-Cassette Name-. 


for each item 0123456789 on scoring line. 


PROGRAM DOCUMENTATION (PD) 

No Instrui 

PROGRAM POLISH <PP> 

Sloppy. Amateurish 0123456789 Professional 
USE OF SPECIAL FEATURES (USF) 

Minimal Usi 

LEVEL OF CHALLENGE (LC) 

Not Challending 0123456789 Very Challenging 
ORIGINALITY AND CREATIVITY <0C> 

Adapted. Same Old Stuff 0123456789 Totally Brilliant and Unii 
LEVEL OF INTEREST (LI) 

Borins 0123456789 Fascinating 
EDUCATIONAL VALUE (EV) 

EASE OF USE (EU) 

Awkward. Inconvenient 01 23456789 Easy. Quick. Convenient 
OVERALL VALUE (OV) 

Almost Worthless 0 1 2 3 4 5 6 7 8 9 
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CASSETTE REVIEW 


Date: 8/30/80 


CASSETTE NAME: Program Tape #2 

PROGRAMS ON CASSETTE: Wumpus 3.1; Blackjack II; Life 4.2; File Create; 
Tape Input/Output; Text Editor; Biorhythm 3.0 


CASSETTE PRICE: $10.00 LISTING PRICE: Not Available 

SOURCE Name: Mark Keller 

Address: 9536 Shumway Drive 

City: Orangevale State: CA ZIP: 95662 


Reviewed by Bill Rueger Age 31 
PROGRAM NAME: Wumpus 3.1 

DESCRIPTION: This Is a very good version of Wumpus. Perhaps the best 
feature Is that ft allows you to program your own cave sequence and also to 
save ft on tape for later use. This Is done using the Tape Input/Output 
program that follows. This attribute, and the documentation, is worth the 
price of the cassette alone. 


RATING % based on applicable rating Items. 53/72= 73.6% 

PD= 7—PP= 8 USF= 5 LC= 6 0C= 7 LI= 6 EV= XX EU= 7 0V= 7 

Time to play 10-30 mfn. For ages All # of players 1 

PROGRAM NAME: Blackjack II 

DESCRIPTION: This program Implements the game of Blackjack for one 
player vs. the computer. The rules are the same as the casinos with the 
exception that If you split your cards the dealer will play against each hand 
after you stand on It. The dealer also alternates between two decks and only 
deals the top 26 cards from each deck. If you do not already have the Blackjack 
Vldeocade, this version Is very good, minus the graphics and multi-player 
capability. It also allows for Insurance as do the casinos. 


RATING % based on applicable rating Items. 42/72 = 58.3% 

PD= 7 PP= 8 USF= 1 LC= 5 0C= 5 LI= 5 EV= XX EU= 6 0V= 5 

Time to play Variable For ages 10 up # of players 1 

PROGRAM NAME: Life 4.2 

DESCRIPTION: While not as fast and graphically "clear" as other versions 

I have encountered, this version does have some helpful features that make It a 
must for any Life addict to acquire. It has the ability to stop the program at 

the end of a generation and change or Insert additional colonies. The program 

can then continue at the generation It was on. It also allows you to set up the 
program visually through keyboard entry, eliminating the need to use graph 
paper and co-ordinates. 


RATING % based on applicable rating Items. 38/ 63 = 60.3% 

PD= 6 PP= 7 USF= 4 LC= XX 0C= 5 LI= 5 EV= XX EU= 6 0V= 5 

^ Time to play For ages All # of players 

PROGRAM NAME: File Create 

DESCRIPTION: Allows you to make files of string data. This Is a very 
useful program which allows you to create data records for later use. For 
example, you can create a file of cave locations to be used with the Wumpus 
Program. This can be stored on tape and used whenever you wish. A most 
Interesting program, with good documentation on how It's down. 

RATING % based on applicable rating items. 50/ 63 = 79.4% 

PD= 4 PP= 8 USF= XX LC= XX 0C= 9 LI= 7 EV= 8 EU= 6 0V= 8 

Time to play -For ages_.# of players 
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PROGRAM NAME! Tape Input/ Output 

DESCRIPTION: This program lets you make copies and also enter them Into 

the computer of Data Files. It Is used In conjunction with the File Create 
program. It Is an excellent program with Documentation on "how It works". 


RATING % based on applicable rating Items. 49/ 54 = 90.7% 

PD= 8 PP= 9 USF= XX LC= XX 0C= 8 LI= XX EV= 8 EU= 8 0V= 8 

Time to play -For ages_ # of players 

PROGRAM NAME: Text Editor 

DESCRIPTION: This Is another useful program that allows you to edit each 

line in your program to correct errors, make changes etc. It takes up only 
300 bytes so can be used with lengthy programs. It lets you access any line In 
a program and edit It without having to retype the entire line. A must for 
anyone who writes his own programs. 


RATING % based on applicable rating Items. 50/ 54 = 92.6% 

PD- 8 PP= 9 USF= XX LC= XX 0C= 8 LI= XX EV= 9 EU= 9 0V = 8 

Time to play -For ages_# of players 

PROGRAM NAME: Biorhythm 3.0 

DESCRIPTION: This program plots your particular Biorhythm for a given 

month and day. It does so by graphic display. It also Includes "experimental" 
cycles of Health, Sex, Precognition, and Natural High. It Is a very graphic 
program and easy to read. 


RATING % based on applicable rating Items. 49/ 63 = 77.8% 

PD“ 7 PP= 7 USF= 7 LC= XX 0C= 7 LI= 7 EV= 0 EU= 7 0V= 7 
Time to play --For ages All # of players 1 


PHILOSOPHY A bit of space otherwise unoccupied, so I shall inject a 
few words... There is no single place that one can go to for full 
information about the Bally Arcade, or its version of Palo Alto Tiny 
BASIC. There is no book that will convert from any other dialect of 
Tiny BASIC (upwards of 400) into Bally BASIC. Effort in this area 
requires a lot of cut-and-try, and certainly an understanding of what 
was intended by the originating programmer. That is, you have to know what 
he had in mind when he wrote the program. I have tried to fill the 
void of understanding how/why the Bally works the way it does with the 
ARCADIAN, and through the help of a lot of contributors, we have been 
able to document quite a bit, and to begin to understand its operation. 

All this material is included in the earlier issues of the ARCADIAN, 
from the first one to the latest. Those of you who are new subscribers 
should avail yourselves of the material that is in the first two volumes, 
because it is not my intent to reinvent the wheel every year and go over 
that material. Aside from the knowledge you will obtain, there are some 
really great programs in there, like Collins' Checkers, or Perkins' 

Ojello, to pick a couple. If someone were really ambitious, they could 
extract the tutorial material, and the game material, and produce a sort 
of digest, but not me. Dick Hauser has put a lot of games on tape, so 
part of that has been done already. Back issues are available at $10 for 
each year, 1979 and 1980. 
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ADS: 

• Programs available: Mastemind(1 player);Spell and Score(2);Slot Machine(1 ); Craps (1); 
Checkbook Balancer; Russian Roulette (to 10); above 2.50 each. Dragon Hunt (1) 1.50 - 
try to find the invisible dragon.on a 10x10 table. Prices are for listing or for 
recording on your tape. All old programs revised and Improved, and all programs come 
with complete instructions,guaranteed bug-free. S.Walpole,11480 Beirut Ct. #204, 
Sappington, M0 63126 

• Bally Software: Memory Maze (1-2 players) study the maze, then try to move thru it 

when it is invisible, scoring, color, music. Crazyface - Bally draws chinaman, foctball 
player,witch,singer, mountie; then you move hats, eyes, noses,mouths,necks to develop 
your own crazy faces. Hidden Word Finder - manipulates a hidden word puzzle. All three 
on tape plus full documentation 7.95s S.Walters,556 Langfield, Northville MI 48167 


AN EXPANDED ISSUE this time as a number of good items 
came in. Also ,the expected postal rate increase is 
apparently a bit off, so I have seme excess money which 
is going into the larger volume of printing and postage. 

BUT I'm also drained out of material, so please keep the 
programs and tutorials coming in for our mutual under¬ 
standing. 

The SOURCE is mentioned a couple of times inside, it is 
composed of a giant computer having lots of data stored 
in it, such as the latest stock reports, UPI news reports 
on both national and local levels,a New York Times data 
bank, lots more. It also allows classified ads to be placed 
or read, private letters between subscribers, or 'face-to- 
face' talking. You can use it as a word processor or a 
computer, then store your work 'till another day. All you 
need is a computer terminal (Bally and TV screen) and a 
Modem to tie to the telephone lines. Full details in the 
next issue. 

HAPPY HOLIDAYS to you all!! 
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When you’re through 
playing “Space Invaders” . . . 

PLAY “SILENT NIGHT” 
on your Bally Arcade! 

PRESENTING 3-PART 
ARCADE CHRISTMAS MUSIC 



Just push: INPUT-GO and they all 
play consecutively. <fcQ5 

All 27 programs on one tape . . . ■ 

A Send check or money order to. 

/C\ 1 \ GEORGE mOSES CO. _ 

HO E. North St.. Brighton. (Til 48116 
(313) 227-1575 
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The SOURCE TCD 959 

Robert Fabris, joyous at Noel 

3626 Morrie Dr. 

San Jose, CA 95127 
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T ^nH W ^i t i er Cons ™ er Eiectronic Show is going on as this issue is being mailed 
reP °u t ° n flra Astro Vision developments next month. Rumors are 

ot\Tse 3 rVT flVe gameS ° Ut ^ Janua ^* plus tSS. by 
ishelSLWiththe mJsic rLf ^^J***’ based on the arcade game. George Moses 
keyboard/memo^ addition is atU^wfS? 

INTERACTIVE COMPUTER OPERATION has finally been accomplished by two Bally owners. 

A tape program was loaded into one machine and transferred to the other through 
an amplifier. Then the users/machines alternated activities, transferring choices, 
etc., from one machine to the other. More details as I get them. 

SCREEN POSITION. I've had an occasional query about the control - or lack of 
control- of the horizontal position of the display. Has anyone come up with a 
method to move the display to the left about one character (above and beyond 
the TV's horizontal control)? 

BLUE RAM ENHANCEMENTS are discussed on pp 36 and 37- As you will read, a break- 
tnrougn nas been made where now Bally BASIC programs can be stored in the Blue 
Ram, allowing the full use of the 4K memory for Basic statements. It had been 
thought earlier that only machine codes could be stored there, but this new 
technique now allows expansion of programs by all users, not just those adept 
at machine language. 

^ j Pro^ct is the electronics for a modem attachment. The modem (MOdulator- 
DEModulator) is a device that converts data pulses of the computer into audio 
tones understandable by the telephone system, and vice versa. These can be 
either a kind that you physically place the telephone handset into, or a kind 
that plugs into the telephone wall jack. Once you have tied into the telephone 
line, you can communicate with virtually any other so-connected computer. The 
electronics discussed o*p. 37 will work with the Livemore STAR, and may work 
with others. The major problem is lack of standardization of computer equipment. 

Pg£ ULA f COMPUTER DESCRIPTIONS are contained in Creative Computing, Dec.80. These 
are not leature-ior-feature comparisons with good/bad points outltaSd! tat indi! 

seH^in r +h i + WS 6aCh m0St P°P ular systems. There is also a tabulated 

section that makes specification camparisons (memoiy size,price,etc.). Another 
article discusses seme of the various BASIC language dialects. 

TTrLE/ INSTRUCTION PROGRAM Corrections were received from Steve Walters for his 
utility program, printed on p.20. The program to be loaded should read as follows: 

PRINT^*1 IST^*PRTNT* ™ T; „ PRINT "-PRO-AM TITLE", PRINT ".BY AUTHOR"; 

PRINT, LIST, PRINT; PRINT .STANDBY FOR ",; PRINT ":RETURN; ;INPUT 2" 

When this is entered, the fourth line of the fourth paragraph, p.20, will read - 
.STANDBY FOR sRETURN; :INPUT 2 
A Byte-savinq Hint 

If you have unused variables (A thru Z) you can set them equal to the recurring 
numbers in your program. This saves 1 byte each time a 2-digit number is used, 

2 bytes each time a 3-digit number is used, etc. Furthermore, since these 
variables can be set during the tape loading rather than as a part of the program 
content itself, it does not take any program memory space to set them. Since 
they are not affected by stopping and re-running the program, the procedure 
works nicely. 

c Robert Fabris, 1981 _ -Steve Walters _ 
















THE SOURCE' IS A SERVICE COMPRISING fi VERY LARGE DATA BRNK THAT 
CRN BE ACCESSED BY R COMPUTER HAVING R TELEPHONE CONNECTION. AS R 
SERVICE, THERE IS R ONE-TIME CONNECT CHARGE OF *100, WHICH PROVIDES 
YOU WITH THE ACCESS CODES AND LOCAL TELEPHONE NUMBERS TO GAIN ENTRY TO 
THE SYSTEM, LOCATED NEAR WASHINGTON, D.C. IN ADDITION, THERE IS AN 
HOURLY FEE FOR THE USE OF THE COMPUTER. ACTUALLY, THE MACHINE COUNTS 
MINUTES AND ADDS THESE UP TWICE A MONTH AND CONVERTS TO HOURS, THEN 
BILLS YOUR VISA,ETC. ACCOUNT. 

SO WHAT DO YOU GET? FROM THE COMPUTER HOBBYIST STANDPOINT, YOU 
CAN TALK BASIC, COBOL, OR FORTRAN TO IT. THEY ALSO HAVE THEIR OWN, 
CALLED INFO V, WHICH IS A DATA-TYPE OF SYSTEM, SUCH AS SETTING UP 
PAYROLLS, ETC. IF YOU WANT TO KEEP PROGRAMS IN THEIR MACHINE, STORAGE 
TIME IS AVAILABLE AT ABOUT *1 FOR 2K PER MONTH. 

A SORT OF WORD PROCESSOR IS AVAILABLE - I AM USING IT FOR THIS 
SEGMENT - WITH CERTAIN EDIT FUNCTIONS, SUCH AS ERROR 11 CORRECTION AND 
RIGHT MARGIN JUSTIFICATION. I HAVEN' T LOCATED ALL ITS CAPABILITIES 
YET. 

USER-TO-USER COMMUNICATION IS POSSIBLE ON THREE DIFFERENT LEVELS. 
1: BROADCAST - A BILLBOARD OR CLASSIFIED AD SECTION IS AVAILABLE, 
WHERE ANYONE CAN READ YOUR WORDS, LOCATED IN A CATEGORY THAT YOU CAN 
SELECT (HOUSE FOR SALE, CAR WANTED, SOFTWARE FOR SALE, ETC.) 2: 
INDIVIDUAL - ONE CAN WRITE MESSAGES, TO SPECIFIC PERSONS. WHEN THEY 
SIGN IN, THEY WOULD ASK FOR 'MAIL' ,AND RECEIVE THE MESSAGES THEN. 3: 
FACE-TO-FACE - TWO PEOPLE CAN MAKE PREARRANGEMENTS TO BE ' UP' AT THE 
SAME TIME AND COMMUNICATE DIRECTLY WITH EACH OTHER. 

DATA BASE - A LARGE VOLUME OF THE COMPUTER MEMORY IS TAKEN UP WITH 
VARIOUS TYPES OF DATA. FOR EXAMPLE, AIRLINE SCHEDULES, STOCK MARKET 
QUOTATIONS, NEW YORK TIMES AND UPI REPORTS, JACK ANDERSON'S COLUMN, 
OVER 600 JTEMS. A SMALL PART OF THE CATALOG IS SHOWN HERE. 



The December issue of KILOBAUD MICROCOMPUTING has a good "how I did it" article 
on getting up on the SOURCE, p. 180. 

A phone call to 1-8OO-336-333O will indicate if there is a local telephone number 
available to you. Communities of less that 50,000 have not yet been provided with 
such numbers, but this keeps changing. 
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♦CRICKETS 



( 2 )♦ 


5 ♦SURF SOUNDS (1)♦ 

S IF &(23)=8G0T0 11 
7 IF &( 22 )=8G0T0 7200 

10 CLERR RETURN ;NT=0;&(21 )=0;&(22)=0;&(IS )=71;&(17)=0;&(18)=0;&(19 )=0;&(20 ) 
=0;GOTO G 

11 FC=245;BOX 0,-20,160,48,3 

15 BC=7;&C 23 )=179;&(18 )=150;&(1G )=50;&(19) = 1 

20 BOX RND (1G0) -88,RND (30)-44,RND (30),1,3;BOX RND (200 )-100,RND (28)-44,30, 
3, 1 

30 B=RND (11) -7 
40 C=RND (4)-3;IF C=0C=-1 
45 G=RND (3)-2;IF G=0G—1 

47 IF H >23G=-(RBS(G)) 

48 IF H<23G=(fiBS(G)) 

50 P=RND (5 )+10 
G0 FOR G=1T0 P 

70 E=E+C;&(22)=E;IF E<35E=35 
75 IF E>41E=41 

80 D=D+B;&(18)=D;IF D>254D=250 
83 IF D<150D=150 
100 H=H+G;&(21 )=H;IF H<19H=19 
106 IF H >30H=30 
110 NEXT Q 

115 &(19 )=RND (3);&(17 )=RND (7) 

120 GOTO 20 
7200 CLERR 
7205 FC=12;BC=0 
7210 FOR R=1T0 G0 

7220 BOX RND (160)-80,RND (88)-44, 

7230 NEXT R 
7240 &(16)=255 
7250 &(22)=40;&(21)=15 
7260 &(20)=RND (50)+10 
7270 &(23)=RND (255) 

7280 GOTO 7240 


Barry Ellerson 
8801 Golf Rd #3F 
Des Plaines, IL 60016 


2 . 

I 3 . 

4 .♦♦♦ CIRCLE PLOTTER 

5 CLERR ;:RETURN ;NT=0 
7 BC=0;FC=131 

10 INPUT “ Xa“R 

11 INPUT -tY'-B 

12 INPUT "RRD?”R 

13 U=1;0=1;P=1;Q=1 

15 F=R-R 

16 FOR X=FTO F+2bR 

17 S=RbR-((X-R)b(X-R));T=Uc4;IF T>Rc8T=U-l 

18 FOR U=TTO 500 

19 IF (UbU)>SGOTO 21 

20 NEXT U 

21 U=U-1;IF (S-UbU)<((U+l)b(U+l))-SGOTO 23 

22 U=U+1 

23 Y=U+B 

24 BOX X,Y,0,P,Q;BOX X,Y-(2bU ) ,0,P,Q 

25 BOX Y-B+R,X-fl+B,0,P,Q 

26 BOX Y-B-(2bU)+fl,X-R+B,0,P,Q 

27 NEXT X 

30 CY=40;GOTO 10 
110 GOTO 10 
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"HR"H;INPUT "MIN"M;PRINT ”#1 TO RUN 


-10,-30,2;LINE 0,0,2;BOX -10,-33,5,5,2;LINE 10,-30,1;BOX 10 


— 

2 . 

3 .GRANDFATHER CLOCK 

4 : RETURN ; CLEAR ; NT=0; &( 0 )=0;&( 1 1=0; BC=0; &( 2 )=131; &(3 )=131; FC=234; &( 9 1=20; A= 
0;P=115 

5 PRINT "SET TIME”;INPUT 

6 IF &(23)=8G0T0 8 

7 GOTO 6 

8 CLEAR 

9 CX=-17;CY=37;PRINT "11CY=39;CX=-3;PRINT ■12";CY=37;CX=14;PRINT "1 

10 CX=-23;PRINT "10",;CX=20;PRINT “2";CX=-24;PRINT "9",;CX=25;PRINT "3 

11 CX=-19;PRINT "8",;CX=20;PRINT "4";CX=-13;PRINT "7",;CX=14;PRINT "5";CX=0;CY 
=4;PRINT "G 

12 BOX 0,22,G0,44,3;BOX 0,22,SS,42,3;BOX 0,-22,41,44,1;BOX 0,-22,31 40 3 

13 BOX -35,-39,32,10,1;BOX 35,-39,32,10,1 

14 @(11=42;@(21=53;@(31=47;@(41=71;@(51=71;@C61=47;@(71=42;@(81=53;@(91=42;@(1 

01=47;@(111=53;@(121=71 

15 @(13 1=71; @( 14)=42;@(151=47;@(161=53;GOTO 310 

20 LINE 0,0,4;LINE 10,-30,2;LINE 0,0,2;BOX 10,-33,5,5,2;LINE -10,-30,1;BOX -10 
,-33,5,5,1;RETURN 

21 LINE 0,0,4;LINE 
,-33,5,5,1;RETURN 

25 &(221=0;&(181=57;&(161=@(U1;&(171=18;&(181=2;&(221=188;&(211=207;&<181=58 
2G FOR B=1T0 11;&(22! = -lbB+61;&(211=-lbB+207; NEXT B 
27 &(211=195;&(171=0;&(211 = 194;&(221=40;&( 211=193;RETURN 

29 0=0 

30 FOR G=2T0 A 

31 0=0+1 

35 S=S+1;Q=Sc2;GOSUB RM+20;GOSUB 25;I=0c4;IF RM=0P=40;GOTO 100 
37 GOTO 31 
40 NEXT G 

44 IF R#75P=115;GOTO 100 

45 P=70 

50 FOR G=1T0 H 

55 S=S+1;Q=Sc2;0=17;@(01=66;GOSUB RM+20;GOSUB 25 
80 GOTO 100 
70 NEXT G 
80 P=115 

100 &(21 1=0;&(221=0;&(161=71;&(171=8;&(181=0 

101 S=S+1 

103 Q=Sc2;GOSUB RM+20 

105 IF S>59S=0 

106 CX=30;PRINT #3,S," ", 

110 &(18!=(RM+3lb5;&(231=28;&(211=213;&(221=51;&(211=0;&(221=0 
112 IF S=0GOTO 200 

114 T=80;GOTO P 

115 FOR 2=1TO T;NEXT 2 

116 GOTO 101 

200 M=M+1;IF M=60M=0;GOTO 300 
210 CX=-30;IF M<10PRINT "0",#0,M, 

220 IF M>8PRINT #0,M, 

225 R=1S;IF M=0R=75 

226 A=(M+RIclS;IF RM=0S=S+(Ab21;GOTO 28 
230 P=115;GOTO 100 
300 H=H+1;IF H=13H=1 
310 CX=-48;CY=-39;IF H<10PRINT " ", 

320 PRINT #0,H,;CX=-36;PRINT 
330 GOTO 210 


Barry Ellerson 
8801 Golf Rd #3F 
Des Plaines, IL 60016 
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90=RED 


205=CYRN 


172=GREEN 


1 .COLOR CHRRT 

2 . 

3 .BY JIM WINN 

4 . 

5 E=480; F= 1250 

10 CLEAR ;BC=0;FC=7;C=0;NT=0 
20 PRINT “ 0=BLRCK 7=WHITE 

3=MAGENTA 

30 PRINT ” 249=BLUE 126=YELL0W 

70 NT=3;CX=-60;CY=-20;PRINT "SELECT YOUR COLOR ?";NT=0 
80 K=KNC1 )c30 
85 CX=-42;CY=-30 
90 IF K=-4G0SUB 400 
100 IF K=-3G0SUB 410 
110 IF K=-2G0SUB 420 
120 IF K=-1GOSUB 430 
130 IF K=1G0SUB 440 
140 IF K=2G0SUB 450 
150 IF K=3G0SUB 4G0 
180 IF K=4G0SUB 470 
170 IF TRC1 )GOTO 190 

180 GOTO 80 _ 

190 CLEAR ; IF ( A=0 t J*C A=7 )+( A=43 )+C A=90 )+( A=12B )+( A=172 )+( A=205 )+( A=249 )C=C+A 
200 C=C+JY(1) P 

210 IF JYC1)CLEAR 
220 IF 0255 C=255 
230 IF C<0 C=0 
240 BC=C;FC=BC+12 


980 GOTO 890 

970 CLEAR ; IF ( A=0 )+< A=7 )+( A=90 )+( A=172 )+C A=249 )C=^C+A 
980 C=C+JY(1) . - 

985 IF JYC 1 )CLEAR . J*® Winn 

990 IF 0255 C=255 8°* 98 

1000 IF c< 0 c=@ Boiling Springs, NC 

1010 NT=0; BC=C; FC=B ^28017 

1015 IF JYC1)=0CY=0;PRINT C;CX=3;CY=0;PRINT B 
1020 IF JXC1) = 1&C 9)=50;GOTO 10 
1025 IF JXC1 )=-lCLEAR ;GOTO 820 
1030 IF TRC1 )=0GOTO 980 


1040 BOX -40,20,40,20,1;BOX -40,-25,30,1,1;BOX -40,-25,1,30 
1050 &C 2 )=C; &C 3 )=C 

1080 BOX 40,20,40,20,1;BOX 40,-25,30,1,1;BOX 40,-25,1,30,1 


245 IF JYC1)=0CX=-35;CY=0;PRINT C 

250 IF JXC1 ) = 1G0TQ 10 

255 IF JXC1)=-1 GOTO 800 

280 GOTO 200 

400 A=0;PRINT A;GOTO E 

410 A=90;PRINT A;GOTO E 

420 A=172;PRINT A;GOTO E 

430 A=249;PRINT A;GOTO E 

440 A=7;PRINT A;GOTO E 

450 A=205;PRINT A;GOTO E 

480 A=43;PRINT A;GOTO E 

470 A=126;PRINT A;GOTO E 

480 RETURN 

800 CLEAR ;&C 9 )=84 

810 &C0)=C;&C1)=C;B=C 

820 C=0;BC=0;FC=7;NT=0 

830 PRINT ” 0=BLACK 

840 PRINT * 7=WHITE 

850 PRINT “ 90=RED 

880 PRINT " 172=GREEN 

870 PRINT " 249=BLUE";NT=3 

880 CY=-20;PRINT "SELECT COLOR*;NT=I 

890 K=KNC1)c50+2 

895 CY=-30 

900 IF K=0GOSUB 1200 
910 IF K=1G0SUB 1210 
920 IF K=2G0SUB 1220 
930 IF K=3G0SUB 1230 
940 IF K=4G0SUB 1240 
950 IF TRCDGOTO 970 


1070 GOTO 980 
1200 A=0;PRINT A;GOTO F 
1210 A=7;PRINT A;GOTO F 
1220 A=90;PRINT A;GOTO F 
1230 A=172;PRINT A;GOTO F 
1240 A=249;PRINT A;GOTO F 
1250 RETURN 


Once you have this utility program 
on your tapes, you will be able to 
make a good assessment as to the 
colors to be used in a particular 
program you are developing. It starts 
out by asking for a general color 
area, and then it will step through 
the hues (using the Joystick). When 
you find one you like, moving the 
joystick to the left will cause the 
' screen to split, and you can make 
your second choice on the left side. 
In this way you can easily see how 
the colors will look. And as you do 
this, the color numbers appear to 
identify them. 
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MORE BLUE RAM BASIC. Since the last ARCADIAN was published, 
considerable progress has been made toward loading and running 
BASIC programs in the Blue Ram. Two separate approaches have been 
pursued, each with its own advantages and trade-offs. The first 
approach is along the line described briefly in the last ARCADIAN 
where CALLS are made to BASIC segments which are essentially line- 
extensions to the line containing the CALL. Line numbers as such 
are not used and special linkages are required to access a segment. 
(See ARCADIAN pages 15 and 16) An editor to assist in the entering 
and dumping of a Blue Ram BASIC program part is being sent free of 
charge to all Blue Ram owners in the form of a letter from Perkins 
Engineering. The letter contains a series of short programs to aid 
in writing and entering Blue Ram BASIC programs. The advantage of 
this programming approach is that the total program size can exceed 
6000 slightly. Its trade-off is in the careful planning required 
to plan and debug program segments in advance of entering them. 

The second approach is a "Cadillac" compared to the "bicycle" first 
approach. While the "bicycle" is more efficient in terms of 
available memory space for programs, the "Cadillac" has all the 
comforts of home. Just enter program lines into the Blue Ram as 
you would in normal memory. The procedure is as follows: 

1. Load the Blue Ram Operating System. The Blue Ram Operating 
System (1.0) is available on tape for $9*95 and provides the high- 
level linkages and support routines necessary to program both the 
normal and Blue Ram memory in a straight-forward, compatible way. 

2. Enter normal memory program lines as usual with line 
numbers followed by program statements. At the end of the normal 
memory segment, enter either a STOP statement to end processing, 
or a GOSUB nnn* statement to continue processing in the Blue Ram 
memory. 

3. Perform a CALL24576 statement (without a line number) to 
inform the Operating System that the following lines are to be 
entered into Blue Ram memory. The Operating System will respond 
with a BR> prompt. All program lines entered under the BR> prompt 
will be stored in Blue Ram memory. Use line numbers in the normal 
way except that Blue Ram line numbers must be higher than normal 
memory line numbers. Press GO without any statement to return to 
normal memory (and the normal > prompt). Lines may be entered or 
deleted at will in both memories and automatic line sorting occurs 
in both memories also. While in the Blue Ram mode (BR> prompt), 
the LIST statement will list the program lines entered into the 
Blue Ram. PRINT RM will display the remaining program memory 
available in the Blue Ram similar to the way PRINT SZ displays 
the remaining available normal program memory. 

4. Enter an RPLnnn/xxx/yyyy statement to edit a portion of 
an existing line. -RPL is a new command interpreted by the 
Operating System, nnn is any existing line number in either 
memory. / is a delimiter which may be any symbol not in the 
subject text. Which ever symbol is chosen must be used in both 
places in the statement, xxx is any text segment in the existing 
line (including the line number) which is to be replaced by the 
new text segment yyyy. Only the first occurrance of the existing 
text segment will be replaced. The old and new text segments need 
not be the same length and lack of a new segment is taken as a 
simple delete. 
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5- Program transfers to subroutines in Blue Ram memory are 
via GOSUB nnnn statements, where nnnn is the line number of the 
beginning of the subroutine. Variations of this statement are: 

GOSUB nnnn Performs a subroutine call in the normal 

way to both normal and Blue Ram memory. 

GOSUB nnnn* Equivalent to a GOTO nnnn when accessing 

Blue Ram memory. Illegal for normal memory. 

GOSUB nnnn** Equivalent to a return from the current 

Blue Ram subroutine followed by a GOTO nnnn. 
This statement acts as an abnormal exit from 
a subroutine and is illegal for normal memory. 

The GOSUB statement as applied to Blue Ram line numbers has been 
expanded in format to include parameter passing in the same 
statement. For example: GOSUB 3400,23,Q+N-5,"TEXT XXX";... is 
equivalent to: A=23;B=Q+N-5>C=(text address);GOSUB 3400. Each 
parameter following the object line number is automatically 
transfered to the letter variables beginning with A. Where a 
text string is a parameter, the memory address of the string is 
passed as the parameter. The called subroutine can then access 
the text string using the $(n) form. For example: 

1200 GOSUB 5000,"DATE",D 


5000 PRINT "ILLEGAL 
5010 IF C#34 NEXT A 
5020 PRINT " ",B 


",;F0R A=A TO A+15;C=$(A)1256;TV=RM 


Running line 1200 would print the following: ILLEGAL DATE 219 
assuming, of course, D had the value 219 in it. The parameter 
passing can be used in conjunction with the asterisks to form 
some very versatile subroutines and other program segments. 

THE BLUE RAM COMMUNICATIONS INTERFACE will be available January 
15 for connection of the Blue Ram with keyboard to a Livermore 
STAR modem for communications with other ARCADIANS and other 
computers. The basic kit is $69-95 including all parts, program 
tape, and documentation. An optional port for the BASE 2 800B 
printer is also available for $10.00. This printer can be bought 
for about $600.00 and features a programmable font and graphics. 
The programmable font allows the use of the Bally character set 
including multiply and divide signs and the graphics allows the 
printing of what is on the screen (literally). The interface is 
also available wired and tested for $99-95 including the printer 
port. A special package price of $299-95 includes the interface 
kit, a STAR modem, a special Source communications software 
package, and membership in the Source. This package represents 
a $50.00 savings and is available only to ARCADIANS. The special 
Source communications package features a smaller character set 
allowing 40 characters on a line and 14 lines of text. Other 
features include: Auto carriage return to prevent lost mail text, 
auto CNTL-S - CNTL-Q to hold one page of text until it is read, 
bell character, send and receive characters in different colors, 
and more...all tailored to the protocol of the Source. By itself 
this program is $19-95- 

I can supply the BASE 2 printer at $600., and a membership in The SOURCE 

at $100. California residents add tax to these and the above prices. 
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CASSETTE REVIEW 


Date: 8/30/80 


CASSETTE NAME: Program Tape #1 

PROGRAMS ON CASSETTE: Space Battle 9.0; Bombardment 2.0; Bullseye 2.0: 
Startrek III 11.2: Chase III 1.0 


CASSETTE PRICE: $10.00 

SOURCE Name: Mark Keller 

Address: 9536 Shumway Drive 

City: Orangevale State: 

Reviewed by Bill Rueger Age 31 


LISTING PRICE: Not Available 


ZIP: 95662 


PROGRAM NAME: Space Battle 9.0 

DESCRIPTION: You must shoot down the UFO. You have a limited amount of 
time and ammo In which to get the UFO Into your gunslght and fire. The UFO 
becomes more elusive as your aim gets better. Unfortunately, this game Is 
very similar to others and not as sophisticated. 


RATING % based on applicable 
PD= 8 PP= 5 USF= 5 LC= 
Time to play 5 min 1 


■ rating Items. 41/ 72= 56.9% 

5 0C= 5 LI= 4 EV= XX EU= 5 0V= 

or ages All # of players 1 


PROGRAM NAME: Bombardment 

DESCRIPTION: A grid of numbers Is presented and you must pick out four 
of them as your "forts". The computer also has a similar grid and it picks out 
four also. You alternate with the computer in trying to guess which locations 
are chosen by use of the hand controller. The first one to guess them all Is 
the winner. Not a very exciting game and tiring after a few rounds. 


RATING % based on applicable rating Items. 

PD= 7 PP= 7 USF= 6 LC= 4 0C= 5 I T= 

Time to play 3 min. For ages 


A11 


44/72 = 61.1% 

EV= XX EU= 7 0V= 5 
# of players 1 


PROGRAM NAME: Bullseye 

DESCRIPTION: A dart game. No graphics, but a choice of three "throws", 
each with a different set of odds. It allows for up to 20 players to play, but 
unfortunately, It Is not a very exciting game. 


RATING % based on applicable ratli 
PD= 8 PP= 7 USF= 7 LC= 6 0C= 

Time to play 5 min. 


ages 


L I = S 6 
all 


53/72 = 73.6% 

EV= XX EU= 7 0V= 6 

# of players 1 to 20 


PROGRAM NAME: Star Trek III 

DESCRIPTION: THE BEST THERE IS 1l This Is a real time version. It 

Incorporates ALL the features of the 16K-plus versions. Kllngons actually 
move in the Quadrant you are In. When moving, they can utilize a "cloaking 
device" which make them temporarily Invisible. When you f1 r* a phasor or a 
photon torpedo, you see It move on the screen. Five commands are available 
Including direction and energy unit designations. You travel in a 9x9 universe. 
This Is definitely the best Star Trek available for the BALLY. It's really 
ingenious how so much can be crammed Into 1.8K. If you're Into Startrek, this 
Is the one For you. Worth the price of the Tape alonel 

RATING % based on applicable rating items. 71/72 = 98.6% 

PD“ 8 PP = 9 USF= 9 LC= 9 0C= 9 LI= 9 EV= XX EU= 9 0V= 9 

: T1 me to play 30-60 min. For ages All # of players 1 

PROGRAM NAME: Chase 

DESCRIPTION: Robots are out to get you. Similar to "BOTS" already 
published In the ARCADIAN, but you are able to pick the number of robots and 
and also the number of walls. The playing field is also larger. This Is a 
challenging and fun game. 


RATING % based on applicable 
PD= 8 PP= 8 USF= 8 LC= 7 
T1 me to p 1 ay 5 m 1 n. F 


rating Items. 58/72 = 80.6% 
0C= 6 LI = 7 EV= XX EU= 7 O’ 
r ages All # of players 
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~r~ 

3 . 

4 .RLCHEMISYMMETRICAL ART 

5 CLEAR RETURN ;NT=0;&(10)=173;GOTO 20 

10 FOR N=1T0 G 

11 X=X+( HbQ ); Y=Y+( IbR ); R=A+C JbS); B=B+C KbT); U=A-( JbS ); U=B-( KbT); LINE U <J 4 * 1 2 3 4 5 
X,Y,F;LINE R,B,E 

12 LINE -U,-U,4;LINE -X,-Y,F;LINE -A,-B, E;LINE -U,U,4;LINE -X,Y,F;LINE -R 
LINE U,-U,4;LINE X,-Y,F;LINE R,-B,E;NEXT N 

20 L=RND <3)+15;BC=RND (32)b8+RND (3)-1;FC=BC+RND (32)b8+RND (4)+l;C=RNB ( 
;M=M+1;IF C=0C=2 

30 0=BC+RND (32)b8;P=FC+RNB (32)b8;&(0 )=0;&(1)=0;&(2)=P;&(3 )=P;IF M>1BC=2; 
FC=RND ( 32)b8+(2bC)+2;&(8)=50;GOTO 50 

40 GOSUB L+25;GOTO 50 

41 &(9>=148;RETURN 

42 &(9 )=20;RETURN 

43 &(9 )=20;&(0 )=BC;&C1)=BC;RETURN 

50 Q=RND C 5)-1;R=RND (5)-l;S=RND (5)-l;T=RND (5) 

80 G=RND (20)+5;F=RND C4);E=RND (4);IF F=4F=1 

70 H=RND (3)-2;J=RND (3)-2;K=RND (3)-2;IF E=4E=2 

80 I=RND C 3)-2;IF E>1IF F=3F=2 

90 IF (RBSC R))-X>50fl=0;BC=144;&(0)=144;&(1) = 144;FC=RND (32)b8+RNB (4) + l 
100 IF (RBSCX))-R>50X=0;BC=129;&(0) = 129;&(1)=129;FC=RND (32)b8+RND (4) + l 
110 IF ( RBSC B) )-Y>30B=0;BC=224;&(0)=224;&(1)=224;FC=RND C32)b8+RND (4) + l 
120 IF ( RBSC Y) )-B >30B=0; BC=0; &( 0 )=0; & ( 1 )=0; FC=RND (32)b8+RND (4)1 + 1 
130 IF (RBS (GblbR+Y))>39G0T0 50 
140 IF (RBS (GbKbT+B))>35G0T0 50 
150 IF (RBS (GbJbS+R) )>79G0T0 50 
160 IF (RBS (GbHbQ+X) ) >72G0T0 50 
170 GOTO 10 

MEMORY EXPANSION 


LINE 
B,E; 
5 )-3 
M=0; 


Barry Ellerson 
8801 Golf Rd. #3F 
Des Plaines, IL 60016 


A motherboard/bus system is one in which a printed circuit board (motherboard) 
contains a number of connectors that are wired in paralle 1. Option items are contained 
on "cards" which plug into any of the connectors. To tell the computer which option 
you want, you have to give it some sort of address, such as "USE SLOT 3". We now 
have the first multi-option expandable bus system in the final stages of production, 
and next month's issue will have the details. The basis for this new system is a 
metal cabinet with a 5-slot motherboard, a bus cable connector, fuze protected power 
supply, and on/off switch with indicator lamp. Once you have purchased this unit, 
you can buy any or all of the below options - when plugged in they are ready to go. 


Options to be available next month will be ; 


1. 16K memory board. 

2. High speed cassette interface at 2400 baud with dual cassette capacity. 

3. Additional 5-slot bus expansion unit. 

4. 2K EPROM board with IK operating system monitor included. Allows keyboard 
and tape input without Bally BASIC language. 

5. 53 key ASCII encoded keyboard with cable and connector. 

Alternative Engineering, having some problems with mail delivery at the 1 Gilbert 
Drive address, have moved to a postal box- P.0. Box 128, Gardiner, ME. 04345. I 
have been using their power supply ($25, see ad p 106) for some time now and am well 
pleased with it. Really heavy duty, professional in appearance, and runs cool. 
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• For Sale: Computer Ear-Complete with software & instruction manual $45. 

Mike Maslowski,9 Arthur Ave. Clarendon Hills,IL 60514 312/654-8937 

« Hand Controllers Repaired; Bill Mead,?531 Chile, Buena Park CA 90620 

BALLY/ASTROVISION SOFTWARE and HARDWARE SOURCEBOOK 

Included In this Sourcebook are descriptions and source Information on 
over 230 Software and Hardware Items. The Software Is Indexed by Program Name, 
Type of Program and Program Source. The Hardware Is Indexed by Hardware Item, 
Hardware Classification, and Hardware Source. This Sourcebook of 50+ pages Is 
available for $ 5.00 from Richard M. Houser 

635 Los Alamos Ave. 

Livermore, CA 94650 


* Software from Steve Walters, 556 Langfield, Northville, MI 48167 (313)349-108] 
Each listing $2.00; all four listings for $5.00, or with tape for $10.00. 

(1) MEMORY MAZE: study the maze, then try to move thru it while it is invis 
Program generates new maze each game. For 1 or 2 players, 3 levels of 
difficulty, scoring, sound effects and music. 

(2) BLACK BOX: find 5 balls hidden in the box by sending probes into the boj 
and seeing where they come out. Like the Parker Brothers game but with 
full hand-control operation and screen feed-back (no notes to keep whili 




ble. (3) CRAZYFACE: Bally draws a cartoon Chinaman, 
and mountie. Then Crazyface lets you mix 
and necks to create your own crazy faces. 

(4) HIDDEN WORD FINDER: manipulates a hidden w> 
school that your kid asks you to find the 
■ hidden words can be easily spotted. You may even find w 

puzzle designer didn't notice! 


d puzzle (lik 


USER GROUP CORNER The Chicago Area Users Club has settled on monthly meetings, 
the third Sunday of each month at the de Vry Technical Institute, 33°° North 
Campbell, Chicago. Call Mike Maslowski, 312-654-8937* Late notes from than 
indicate interesting guests coming up in January (AstroVision representative) 
and February (Jay Fenton, Bally programmer) 

In the Milwaukee area, Doug Alexander, 2911 Parkshire Dr, 
Racine;414-886-5973 would like to communicate with local subscribers. 

In the Long Island area, Bill Rueger,336 Beach 38th St., 

Far Rockaway would be interested in getting together with locals. 


NEW BASIC LANGUAGES 


1. Astro Vision is planning an updating of the Bally BASIC which will primarily 
allow data transfer at a 2000 baud rate, about 7 times faster than now possible, to 
and from tape. This will probably require a pretty good tape recorder to handle the 
high rate. There will be little change in the BASIC language itself. 

2. Extended BASIC, first mentioned on p. 78 of Vol. 2, is close to completion. 
Delays have resulted from our attempts to make the unit compatible with both the 
Blue Ram and the Alternative Engineering expansion mentioned on p.39. This technique 
is pretty unusual in the microcomputer business where incompatibility is the norm. 
The BASIC will be contained in 8K. 
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ASTROVISIQN ADD-ON is called " ZGRASS-32 COMPUTER KEYBOARD ", and was shown 
at the Consumer Electronic Show at Las Vegas a month ago. The box, layout of 
parts, etc., is essentially the same as the one shown by Bally and illustrated 
on p. 29 of Vol 1. The shown sample was all black, and had an arcade unit 
resting on its upper surface. What's inside? The foilwing data is taken from 
a publicity sheet handed out: 32K more RAM, 24K more RCM, the keyboard, and 
the ZGRASS language. Cost?-$599• Delivery?-well..I heard 'manufacturing in 
June' twice, so we'll see. More details... 

Language used is Dr. DeFanti's ZGRASS, a graphics-oriented BASIC. A description 
of the language and its unique commands are contained in Vol 1, pages 11 - 14, 
and 37. The ZGRASS is contained in the 24K RCM, along with a 'scientific math 
system'. It gives four colors anywhere on the screen, which is configured at 
160x100 pixels. The prime direction for ZGRASS is for the development of 
graphically exciting programs, whether they be games, video art, pie charts, 
or whatever. The beginnings were included in the basic arcade unit, with the 
commands LINE and BOX. New commands will be POINT and CIRCLE. Arrays will 
be multi-dimensional. There will be interpreted and compiled modes. The 
extended math package is floating point with trig & log (e and 10) functions, 
and square root. 

PLANNED EXPANSIONS to the keyboard unit include: 

32K more RAM 

TV PRINTER - hard copy of what is on the TV screen ( a scan is made of 
the screen and a print made of it.) 

LIGHT PEN 

BIT PAD DIGITIZER - a worksheet is electrically attached to the computer 

and a wand is touched to the pad. A dot appears on the screen at the same 

relative point. Drawings can be transcribed to the screen(=computer) and 

the coordinates of all the points are now in memory 

DUAL CASSETTE CONTROL at 1800 baud, motor of cassette is computer- 

controlled. 

DISC STORAGE - a connector is included. 

SLIDE COPIER 

SOUND SYSTEM - connection to audio amplifier input 
More details on the above as they are discovered. One of the reasons for the 
CES was contact with dealers/distributors, to show the line, and sign up as 
their plan dictates. Quite a bit has to be regenerated from the old Bally days, 
as well as expansion beyond those levels to get nation-wide coverage. Regard¬ 
less, if you are not able to find one in your area (after June,etc.) let me 
know and we'll handle it by mail order. 

NEW GAME VID2QCADES : Here is the lineup of the first batch - which 
are now scheduled for March 

2011 GALACTIC INVASION / 2012 SPACE FORTRESS / 2014 GRAND PRIX-DEMOLITIQN 
DERBY / 4003 MUSIC MAKER 1 / 4004 BI0RYTHM 

USER GROUP REPORT The CACHE group indicate that they now have a file of 50 
programs in their software library. A reference library of printed material 
(hardware-oriented) is also being set up for the group. It was reported that 
REX TV has opened a new Bally service center at 18666 S. Dixie Highway, 
Homewood, IL 779-7800 

LISTED PROGRAMS have a number of small letters in them, because my COMPRINT 
does not have sane characters. Therefore, you have to make a little conver¬ 
sion, as follows: a = right arrow > b = multiply x c = divide + 

© iqe»l F a lo/is _ /, , _ 
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an F.XCF.I.I.ENT TUTORIAL on Machine Language programming - getting some of the 
basics down - was printed in the November Kilobaud MICROCOMPUTING, p.?0* 

I'd say it was a medium-level description that tought me quite a lot and will 
be used as a reference in later operations.lt explains some of the descrip¬ 
tive codes used ( like 8B CA etc). While the article specifically deals 
with the 6802 processor, the ideas as well as some specifics also fit the Z80. 

BLUE RAM OPERATING SYSTEM (1.0) arrived the other day, and it has two very 
useful features: 1. It allows EDITING of line statements, using a new RPL 
command (RePLace). You can either fix a line by adding, deleting, or changing 
something in the line, or you can change the line number from one value to 
another. People send in programs on tape, and sometimes the transfer to the 
Bally is not correct (usually a long line) and making the correction is a 
pain. But now I've used the 1.0 system, and I can easily make the necessary 
change. Especially since I've loaded the keyboard routine as well. All one 
needs to do is enter RPL (line number)/(old word)/(new word) RETURN or GO, 
and its done. 2. It allows the storage of 38OO Bally BASIC bytes in the 
Blue Ram. ((NOT machine language, but good ol'BB)) This opens up the world 
to those of you who aren't too keen on machine language, because all you have 
to do is follow a few simple rules, and keep writing programs in BB. In essence, 
there is a divider built in, all program lines below 1999 go into the old 
Basic storage areas, while material in line numbers above 1999 go into the BR. 
One can shift back and forth between the two areas. So now there are 56OO 
bytes available - lets see some programs that take advantage of that space. 

ALTERNATIVE ENGINEERING is proceeding with the design and construction of the 
motherboard manory addition. They report that a small rearrangement has taken 
place, in that some previous options are now included in the basic package, 
resulting in about a month's delay. The prime package will include a power 
supply capable of handling all accessories, p.c. board and connectors, scxae 
onboard intelligence to control things, plus some other goodies. The two 
prime accessories will be the memory package and the keyboard package. Other 
units are also under consideration. Full details are due in the announcement 
which I plan to have in the next issue. 

EXTENDED BASIC language is moving along smartly - current plans are to provide 
both tape and ROM versions so you can choose the format that suits you best. 

A little preview of the new commands follows: 

CIRCLE / POINT / NEW (erases program) / DATA (provides initialization of 
variables in a shorter manner) / ZERO (sets all variables to zero) 

In addition to the usual FC and BC, two more foreground colors are available 
in FA and FB. 

There are commands available for storing and retreiving programs, or just 
bits of programs. 

Two windows can be generated on the screen, and their size limits controlled, 
for both graphics and characters. 

How about a 3x5 character set available at CF^SMALL ? 

And it will automatically convert to a hex number base with the ! character. 
SCROLL will roll the screen up or down a specified number of lines. 

}in front of a variable will give its memory location. 

That ought to whet your appetite - we'll have more information as it becomes 
available, including delivery and cost, in subsequent issues. 
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The following tutorial was written 
by Bob Wiseman, and details some of 
his programming 'tricks', explaining 
why. 



HOW TO KEEP IT SMALL. 


WHEN YOU PROGRAM THE ARCADE, YOU HAVE A GRAND TOTAL OF 1.8K 
OF USER MEMORY AVAILABLE FOR PROGRAM AND STRING DATA. THIS IS SELDOM 
ENOUGH. WHENEVER I PROGRAM THE ARCADE, I WRITE THE PROGRAM ON 
PAPER FIRST. THIS ALLOWS ME TO CALCULATE MEMORY 
REQUIREMENTS EARLY SO THAT I CAN HEAD 'EM OFF AT THE PASS. 

I STRUCTURE THE PROGRAM INTO MODULES WHENEVER POSSIBLE. I WRITE 
EACH MODULE ON A SEPARATE SHEET SO THAT I CAN REWRITE A SINGLE 
MODULE WITHOUT AFFECTING ANYTHING ELSE. HAVING A PENCIL 
COPY OF A PROGRAM IS AN INVALUABLE AID WHEN SEARCHING FOR THAT 
ELUSIVE BUG. 

SO, I WRITE THE PROGRAM ON PAPER, AND THEN I ADDUP THE MEMORY 
NEEDED. I HAVE 1800 BYTES TO START WITH. 

COUNT THE FOLLOWING: 

3 BYTES PER LINE FOR STORAGE FOR THE LINE NUMBER AND 
CARRIAGE RETURN. 

1 BYTE PER KEYWORD. THE WORDS PRINT, LIST, GOTO, LINE, 

FOR, TO, NEXT, STEP, GOSUB, RETURN, BOX, INPUT 
IF, AND RND ALL TAKE ONE BYTE. 

1 BYTE PER PUNCTUATION. THESE SPECIAL CHARACTERS TAKE 
ONE BYTE: COMMA, PERIOD, QUOTE, EXCLAMATION, 
PARANTHESIS, EQUALS, POUND SIGN, ETC.. 

1 BYTE PER ALPHABETIC: LETTER. EACH LETTER, WHETHER USED 
AS A VARIABLE OR USED IN QUOTES, COUNTS 1 BYTE. 

ITEMS LIKE CX, BC, AND NT HAVE TWO LETTERS AND SO 
THEY COUNT TWO BYTES. 

SPACE COUNTS ONE BYTE. 

1 BYTE FOR EACH NUMBERIC SYMBOL NOT BEGINNING A LINE. 


HERE ARE SOME EXAMPLES: 

10 GOTO 10 

20 PRINT "ABC 

300 IF A=RND (3)GOTO 400 


(COUNTS 6 BYTES) 
(COUNTS 8 BYTES) 
(COUNTS 14 BYTES) 


IN ADDITION TO THE MEMORY USED IN YOUR PROGRAM, YOU MAY 
NEED TO PROVIDE SPACE FOR STRINGS OF DATA. I AM REFERRING TO 
THE USE OF THE AT-SIGN TABLE TO STORE DATA. EACH TAKES TWO BYTES. 
SO IF YOU USE^(O), @<1>,... ,©(9), THEN YOUR PROGRAM MUST 
LEAVE TWENTY BYTES FREE. 

THE FOLLOWING SHORT PROGRAM: 

10 FOR A=0T09:<g(A)=0:NEXTA 

WILL TAKE 19 BYTES TO STORE, AND AN ADDITIONAL TWENTY BYTES 
WHEN IT IS RUN FOR STORAGE OF THE DATA. 


A3 
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NOW THAT WE KNOW WHERE THE MEMORY GOES, WE SHOULD BE ABLE 
TO USE IT MORE EFFICIENTLY. THESE GENERAL RULES MAY HELP. 

1) COMBINING SHORT LINES TOGETHER HELPS REDUCE THE THREE 
BYTES PER LINE OVERHEAD. 

2) ELIMINATE UNNECESSARY SPACES. THE ONLY TIME THAT A SPACE 
IS REQUIRED BY BALLY BASIC IS TO SEPARATE TWO VARIABLES. 

FOR EXAMBLE: 

10 IF A=CGOTO 10 (NO SPACES REQUIRED) 

20 IF B=B E=F (SPACE REQUIRED TO SEPARATE D AND E) 

3) USE VARIABLES TO REPLACE OFTEN USED, LONG NUMERIC VALUES. 

THIS CAN BE ESPECIALLY VALUABLE FOR LINE NUMBERS. 

EACH TIME YOU USE THE NUMERIC VALUE 3210 (FOR EXAMPLE), YOUR 
PROGRAM IS FOUR BYTES LARGER. IF YOU SAY ,, T=3210 ,, THAT COSTS 
SIX BYTES. IF YOU NEED TO REFER TO 3210 MORE THAN TWICE 
(AND YOU HAVE AN AVAILABLE VARIABLE OF COURSE) YOU CAN 
SAVE MEMORY. 

EXAMPLE: 

10 IF A=3210B=B+1 5 T=3210 

20 IF 6=32100=0+1 10 IFA=TB=B+1 

30 IF C=321OGOTO10 20 IFB=TC=C+1 

30 IF C=TG0T010 

THE PROGRAM ON THE LEFT TAKES 15+15+13= 43 BYTES. THE ONE 
ONE THE RIGHT TAKES 9+12+12+10= 43 BYTES. THE ONE ON THE 
RIGHT RUNS FASTER. IF WE HAD PUT "T=3210" ON LINE 10, THEN 
THE RIGHTHAND PROGRAM WOULD BE SMALLER ALSO. 

4) OMIT TRAILING QUOTATION MARKS. LINE TEN AND TWENTY WILL 
PRINT THE SAME THING. 

EXAMPLE: 

10 PRINT "ABCDEF" 

20 PRINT "ABCDEF 

5) DO NOT BE AFRAID TO RE-WRITE. FIRST, YOU WRITE WHAT WORKS. 
NEXT, YOU WRITE WHAT WORKS BETTER. FINALLY, YOU WRITE IT 
SMALLER. 

EXAMPLE: SUPPOSE WE HAVE REACHED A POINT IN THE PROGRAM WHERE 
WE HAVE A ZERO OR A ONE IN VARIABLE "A". IF ONE, WE 
WANT TO CHANGE "A" TO A ZERO. IF ZERO, WE WANT TO 
CHANGE "A" TO A ONE. SO WE FIRST WRITE THE OBVIOUS: 

100 IF A=OA=l:GOTO120 
110 A=0 

120 ...CONTINUE 

THIS WORKS AND IT TAKES 15+6= 21 BYTES. FURTHER 
HEADSCRATCHING AND THE MEMORY BULB LIGHTS UP: 

100 A=l-A 

THIS TAKES A MERE 8 BYTES AND DOES THE SAME THING. 

I HAVE OFTEN DISCOVERED THAT FINDING A SIMPLE ALGEBRAIC 
FORMULA WILL SAVE MANY BYTES. THE DIFFICULT PART 
IS FINDING THE FORMULA. 

- 4-4- - 
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6) USE SUBROUTINES WHENEVER POSSIBLE. ANYTHING THAT YOUR 
PROGRAM DOES MORE THAN ONCE SHOULD BE IN A SUBROUTINE. 
WHEN YOU BREAK UP A PROGRAM INTO SUBROUTINES IT BECOMES 
EASIER TO DEBUG BECAUSE THE SUBROUTINES CAN BE TESTED 
INDEPENDENT OF THE REST OF THE PROGRAM. DRAWING A SHORT 
FLOWCHART (HORRORS') BEFORE BEGINNING CODING IN BASIC 
WILL HELP ORGANIZE YOUR THOUGHTS ABOUT WHAT SHOULD BE 
A SUBROUTINE. SUBROUTINES HELP AVOID REDUNDANT CODE, 

AND THIS KEEPS IT SMALL. 


PART II. MAKING IT RUN FASTER. 


THE BEST TIME TO MAKE A PROGRAM RUN FASTER IS BEFORE YOU 
HAVE WRITTEN IT. AFTERWARDS, THE CHANGES MAY BE TOO DIFFICULT TO 
MAKE AND DEBUG (SORT OF LIKE ADDING AN EXTRA BATHROOM ON THE 
SECOND FLOOR AFTER THE HOUSE HAS BEEN BUILT). THE GENERAL 
RULE I HAVE FOLLOWED IS: 

(OTHER THINGS BEING EQUAL) THE FEWER BYTES BALLY BASIC 

HAS TO INTERPRET THE FASTER THE PROGRAM RUNS. 

THIS EQUATES TO PART I. IN GENERAL, THE SHORTER A PROGRAM, 
THE FASTER IT RUNS. I HAVE RUN A FEW SHORT TIMINGS AND THEY 
SEEM TO FOLLOW THIS RULE. REMEMBER OUR EXAMPLE WHERE WE REPLACED 
THE VALUE 3210 WITH THE VARIABLE "T". THE EXAMPLE ON THE RIGHT 
RUNS FASTER BECAUSE BASIC HAS FEWER BYTES TO INTERPRET. 

HERE IS AN EXPERIMENT FOR YOU TO PERFORM. WRITE THE 
BASE PROGRAM AS FOLLOWS: 

10 FOR A=0 TO 3000 
90 NEXT A 

RUN THIS AND TIME ITS EXECUTION WITH A WATCH. RECORD THIS 
TIME. NOW TRY INSERTING DIFFERENT LINES INTO THE CENTER AND SEE 
HOW THIS AFFECTS THE TOTAL RUN TIME. I FOUND THIS TO BE QUITE 
INTERESTING. IF NO GRAPHICS ARE INVOLVED, I FOUND THAT THE 
EXTRA EXECUTION TIME WAS ALMOST DIRECTLY PROPORTIONAL TO THE 
EXTRA NUMBER OF BYTES INTERPRETED. USE EACH OF THE FOLLOWING 
AND SEE HOW THEIR TIMES COMPARE. 

20 B=A (6 BYTES) 

20 B=12345+1 (12 BYTES) 

I FIND THAT BOX AND LINE REQUIRE MORE TIME PER INTERPRETED 
BYTE THAN NON-GRAPHIC COMMANDS. 

IF YOU CANNOT MAKE IT RUN FAST, YOU MIGHT AS WELL MAKE 
IT ENTERTAINING. TRY TYING SOME OF YOUR VARIABLES TO 
THE SOUND SYSTEM INPUTS. A MUSICAL DIVERSION WILL 
LET THE OPERATOR KNOW THAT THE PROGRAM IS STILL WORKING, 

AND HASN'T DROPPED DEAD OR FOUND A LOOP. 

- A S - 
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4 .GOLF 

5 .BY BOB HENSEL 

100 FOR Z=1T0 N;@(Z)=0;NEXT 2;B=0;FOR H=1T0 9;G0SUB 3G00 
102 FOR P=1T0 N;U=0;J=0 

104 IF P=1G=13+RND C50);I=15+RND (15 ) ;T=13+RND (50 ) ;R=13+RND (50);S=13+RND (50) 
;B=B+Ic5 

105 CLEAR ;GOSUB 1000;Y=-16;G0SUB 1100;T=T+18;GOSUB 1100;T=T-18;Y=0;GOSUB 1200 
10G Y=10;GOSUB 1300;E=40;F=-41;BOX E,F,1,1,1 

142 LINE 3,-43,4;LINE 3,43,1;LINE 79,43,1;LINE 79,-43,1;LINE 3,-43,1 
144 PRINT ’ HOLE #1,H;PRINT “ PAR “,#l,Ic5," “,#1,Ib20,"YD 

146 W=RND (4);M=( RND (G)-l)b5;PRINT “ WIND:TU=93+W;PRINT #3,M,"MPH", 

147 CY=8;CX=-71;PRINT “PLAYER SCORE", Rob Hens el 

148 CX=-S6;CY=0;PRINT #l,P,#7,U J^g wieside Ave., S. 

150 A—A+JXC1); IF A>16A 1 Cottage Grove, WN 55^6 

151 IF A<1A=1G B 

152 X=2;Y=2;GOSUB 800+A 

153 LINE -40,-20,4;BOX -40,-20,G0,30,2;BOX -40,-20,2,2,1;LINE Xb7-40,Yb7-20,1 

155 C=C+JY(1);IF C>9C=1 

156 IF C<1C=9 

170 CX=-71;CY=-40;PRINT “CLUB: 

172 PRINT " IRON", 

180 IF TRC1 )=0GOTO 150 
200 U=U+l;NT=10;MU=C;NT=0 
202 IF J=lGOTO 3100 
205 FOR Z=1T0 2bC10-C) 

210 IF Z#11GOTO 219 
212 D=0;IF M>5D=1 
214 IF W=1Y=Y+D 
21G IF W=2X=X-D 
217 IF W=3Y=Y-D 
^218 IF W=4X=X+D 

219 E=E+X;F=F+Y;BOX E,F,1,1,3 

220 IF E>3IF E<79IF F<43IF F>-43J=0;GOTO" 240 
230 GOTO 4000 

240 IF E>G-9IF E<G+8IF F>I-8IF F<I+8J=1 
250 IF J=0IF PXC E,F)=0GOTO 4000 
290 NEXT Z 


",#1,C,;IF C=1PRINT “ WOOD”,;GOTO 180 
Golf is a game of skill for 1 to 4 
players. The computer generates 9 dif¬ 
ferent holes each game, randomly placing 
each green and hazards such as trees, 
water,or sand traps. Each player selects 
the.direction the ball will travel by 
moving JX(1) until the rotating line 
points in the proper direction. The dis¬ 
tance is dependent on the club selected 
using JY(1)• Remember the flight of the 
ball is affected by the direction and 
velocity of the wind. 


HOLE 3 

60LF tf% 

PAR H HIOYD 

WIND:f 5MPH 


Pi AYER SCORE 

SJ IS 

♦ \ ™ 

M , 


W JY(1 > 



8r / ■ 

80 6 • 

CLUB: 8 IRON 

HEVSCL 


291 IF J=1GOTO 3000 
295 GOTO 148 

801 Y=0;RETURN 

802 Y=l;RETURN 

803 RETURN 

804 X=l;RETURN 

805 X=0;RETURN 
80G X=-l;RETURN 

807 X=-2;RETURN 

808 X=-2;Y=1;RETURN 

809 X=-2;Y=0;RETURN 

810 X=-2;Y=-l;RETURN 

811 X=-2;Y=-2;RETURN 

812 X=-1;Y=-2;RETURN 

813 X=0;Y=-2;RETURN 

814 X=l;Y=-2;RETURN 

815 Y=-2;RETURN 

816 Y—l; RETURN 

1000 BOX G,I,4,12,1;BOX G,I,10,10,1;BOX G,I,14,8,1;BOX G,I,16,4,1;RETURN 
1100 BOX T,Y,2,10,1;BOX T,Y+2,4,2,1;BOX T;Y,6,2,1;BOX T,Y-2,8,2,1;RETURN 




p47 














1200 BOX R, Y,2,18,1;BOX R, Y, 6, 14, 1; BOX R,Y,10,10,1;BOX R,Y,14,6,1;BOX R,Y,18,2,1 
;RETURN 

1300 BOX S,Y,12,5,1;RETURN 

3000 BOX 41,0,78,87,2;BOX 41,0,16,48,1;BOX 41,0,40,40,1;BOX 41,0,5G,32,1;BOX 41, 
0,72,16,1 

3010 K=20+RND (36);L=RND C16)-8;B0X K,L,3,3,2;E=41+CE-G)b4;F=CF-I)b4;BOX E,F,1,1 
,3;B0X 41,0,79,84,3 

3015 IF flBSC E-K K2IF flBSC F-L X2G0T0 3500 

3017 GOTO 148 

3100 FOR Z=1T0 2b(10-C) 

3110 E=E+X;F=F+Y;BOX E,F,1,1,3 

3120 IF flBSC E-K K2IF ABSCF-LK2G0T0 3500 

3130 IF E>3IF E<78IF F<43IF F>-43G0T0 3140 

3135 GOTO 4000 

3140 NEXT Z;GOTO 148 

3500 CY=0;CX=30;PRINT "SUNK!";@CP)=@CP )+U 
3510 GOSUB 3610;NEXT P;NEXT H 

3600 CLEAR ;PRINT “ PAR=”,#1,B;FOR Z=1T0 N;PRINT ‘ PLAYER",#2,Z,"=",#1,@CZ ),#4,@ 
C Z )-B;NEXT Z 

3610 FOR 0=1TO 1000;NEXT 0;RETURN 

4000 CY=-20;CX=-59;PRINT “PENALTY";NT=40;MU=G0;MU=60;MU=60;NT=0;U=U+1;GOSUB 3610 
;GOTO 148 
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100 

110 

115 

120 

200 

300 

310 

320 

330 
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350 

3G0 

365 

370 

380 

385 

387 

380 

400 

405 

410 

415 

420 

#00 

505 

510 

515 

'700 

710 

715 

790 


.MUSICAL STRFF 
.BY BOB WISEMAN 
GOSUB 350 
N=N+1 

GOSUB 300;IF WGOTO 50 
GOSUB 200;GOTO 20 
GOSUB 400;X=X-9 
C=JXC1)+2bJYC1) 

IF C=0GOTO 60 
IF C=-2G0T0 10 
FOR M=0TO N-l;P=@(M)c50;T 
GOSUB 700;NEXT M 
IF C=2IF TRC1 )=0GOTO 120 
GOTO 30 

FOR M=0TO 100;NEXT M;GOTO 85 

@(N )=50bP+T;RETURN 

X=X+9;IF X>70X=-70;Y=15-Y;GOSUB 

GOSUB 800;GOSUB 700 

IF TR(1 )+TR( 2)W=TR(2);RETURN 

0=JX<1);W=JY(1) 

IF U=0IF W=0U=0;GOTO 320 
IF U=lGOTO 320 

U=1;P=P+W;IF (P>19)+(P<0)P=P-W 
IF O=0GOTO 385 
IF O<0T=Tc2 
IF 0 >0T=T+T 
IF T >32T=32 
IF T<2T=2 

GOSUB 400;GOTO 310 
BOX X+l,Y+7,10,12,2 
BOX X+l,Y-27,10,14,2 
FOR 0=Y-17T0 Y-2STEP 5 
BOX X+2, 0,10,4,2;NEXT 0 
RETURN 

BOX 0,Y-10,160,44,2 
FOR O=Y-20TO YSTEP 5 
BOX 0,0,160,1,1;NEXT O 
RETURN 

&C16 )=49;&(17)=@(B-P);&(22)=127 
FOR A=0TO 20bT;NEXT A 
&( 22)=0 
RETURN 


I=0BOX X,0-1,3,1,2 


800 1=0;IF P=Pc2b2I=l 

810 O=Y-(20-P)b5c2+16 

815 BOX X,0,5,4,1 

818 IF (P<5)+(P>15 )GOSUB 906 

825 IF T>12B0X X,0,3,1,2;IF 

830 IF T=32RETURN 

835 H=S-I 

845 IF P>llH=-H-2+I 
847 K=2bABS(H)-l 
850 BOX X+2,H+0,1,K,1 

855 IF T>6RETURN 

856 IF H< 0K=2-K 


MUSICAL STAFF writes notes in the 
key of C» using controller #1. 

JY command changes the note,while 
JX command changes the length. 

TR enters the note. Controller #2 
plays the tune once, repeatedly, 
or starts over. 


858 IF T>3IF PM1G0T0 870 
860 BOX X+3,K+0,3,1,1 
865 IF T>3RETURN 
870 BOX X+3,K+0-2,3,1,1;RETURN 
900 IF P >15B0X X,Y+5,8,1,1 
905 IF P>17B0X X,Y+10,8,1,1 
910 IF P<5B0X X,Y-25,8,1,1 
915 IF P<3B0X X,Y-30,8,1,1 
920 RETURN ■■ - 

Rob Wiseman 

118 St.Andrews Dr. 

Cincinnati OH 45245 


950 :RETURN ;NT=0;CLEAR 

951 M=SZc2;N=M;A=1000;B=90;GOSUB A;B=80;GOSUB A 

952 B=71;GOSUB A;B=67;G0SUB A;B=60;GOSUB A;B=53;G0SUB A;B=50;GOSUB A 

953 B=44;GOSUB A;B=39;G0SUB A;B=35;G0SUB A;B=33;G0SUB A;B=29;G0SUB A;1 

A 

954 B=24;GOSUB A;B=22;G0SUB A;B=19;G0SUB A;B=17;G0SUB A;B=16;G0SUB A; 1 
A / 

960 P=4;T=8;N=-l 

961 B=M 

965 X=70;Y=-10;RETURN 
1000 N=N-1;@(N)=B;RETURN , 


1=26; GOSUB 
1=14; GOSUB 
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A selection of short programs from the programming efforts of 

Dieter Heinerman, 505 4th Ave.S.W. #1511 Calgary,Alberta,Canada T2P 0J8 


1 . 

-2 . 

3 . 3D CORNERS 

4 . BY DIETER HEINERMAN 
9 NT=0 

10 CLEAR 

11 FC=7 

IB FOR A=1T0 44STEP 1 

17 IF TR(1 )=1G0T0 50 

18 IF TR(2)=1CLEAR 

19 BC=7bB 

20 BOX A,-A,A,A,3 
25 BOX -A,A,A,A,3 
30 BOX A,A,A,A,3 

34 BOX -A,-A,A,A,3 

35 &(22)=255;&(18 )=A 

36 NEXT A 

37 B=RND (255) 

33 FC=B 

40 GOTO 16 

50 FOR A=44T0 1STEP -2 
70 GOTO 20 


3 . ELECTRONIC BLANKED 

4 . BY DIETER HEINERMAN 

5 NT=0 
9 CLEAR 

10 A=RND (6) 

11 FOR E=1T0 5 

12 .TRY NT=R 

13 &(22)=255 

15 IF E=5G0T0 90 
20 FOR B=-70TO 70STEP A 
25 &( 17)=B;&(18)=BbA 
30 C=RND (8) 

35 IF TR(1)=1G0T0 9 

40 FOR D=-40TO 40STEP C 

41 MU=BC 

42 BC=B+200 

43 FC=BC-53bC 

45 &(IS)=DbC f 

48 &(20)=A+CbD 
50 BOX B,D,A,A+C,3 
80 NEXT D 
70 NEXT B 
75 NEXT E 
80 GOTO 10 
90 PRINT 

100 IF &(23 )=8G0T0 9 
110 GOTO 100 


INPUT DENOMINATOR 


2 . , 

3 . 

4 . DENOMINATOR 

5 . BY DIETER HEINERMAN 
8 CLEAR 

7 BC=56 

8 NT=1 

9 PRINT ;PRINT 
10 INPUT " ”,N 
20 FOR T=1T0 N-l 
30 X=0 

40 PRINT 
50 A=T 

60 PRINT #2,A,#1, -c-,#1,N,#1 
70 IF (Abl0 )cN<1GOTO 140 
80 A=Ab10 
90 PRINT #1,(AcN), 

100 X=X+1 

,-.110 IF X >=N- 1GOTO 190 
120 A=A-(AcN)bN 
130 GOTO 70 
140 A=Ab10 
150 PRINT #1,0, 

160 X=X+1 

170 IF X>=N-lGOTO 190 - 

180 GOTO 70 : 

190 NEXT T ] 

200 IF &(23)=1G0T0 
210 GOTO 200 


IOXES 


WANT MORE? PRESS 1 “ 




5 NT=10 
8 CLEAR 
7 BC=T27 
10 &(22)=255 
20 FOR C=1T0 100STEP 
,30 FC=BbA 
40 A=RND (140)-70 
50 B=RND (80)-40 

55 MU=A 

56 &(18)=B 

57 &(20)=C 

60 BOX A,B,5,5,3 

61 BOX -A,B,5,5,3 

62 BOX A,-B,5,5,3 
65 BOX -A,-B,5,5,3 
70 IF O99G0T0 90 
80 NEXT C 

90 FOR E=1T0 10STEP 1 
95 MU=E 

100 IF E=10CLEAR 
110 IF TR(1 )=1G0T0 10 
120 NEXT E 
130 GOTO 90 












ADS:WANTED: Used Bally interface in good working condition - cheap. 

R. Ruppert 2722 Pyramid Ave., Pittsburgh PA 1522? 

FOR SALE: Software by W&W Software Sales,6594 Swartout Rd. Algonac 
MI 48001. Nine tapes with five programs each, plus a new 
one for the Blue Ram (This one is available on tape only, 
$5». and called 'Bally Nuclear Power Plant') See ad on p. 

10 for more details... 

FOR SALE: Cartidges because UPS lost my Arcade: BASIC,INTERFACE at 
$35 each: BASEBALL/FOOTBALL/SEA WOLF/CLOWNS/MATH BINGO/ 
280ZZZAP/STAR BATTLE/RED BARON/BLACKJACK at $15.each. Check 
or money order plus $1. to Randy Rienth, Rt 1 Box 73H, 
Gloucester, VA 23061 

FOR SALE: Software by Rob Rosenhouse, 44 Forestbrook Dr., North 

Plainfield, NJ 07060. Super Software now offers 6 sets of 


programs including a new one based on Missile Command by 
Atari. For catalogue including 2 RND(ART) programs, send 
a large SSAE 


USER GROUPS: If you are in the following areas, contact the persons listed: 

Metropolitan Washington,DC-Jerry Heere,2802 Avon Ave Silver Spring 19608 
Westchester Co.areaNY-Dan Simpson Box 229 Somers, NY 1O589 
914-248-7058 

FOR SALE: Bally factory games and accessories - special discount to 
ARCADIAN subscribers. For free price list, write to SFP, 

1064 N. Alta Ave. Dinuba, CA 93^18 


HOT FLASH! latest 

ASTRO VISION PRICE LIST 
SHOWS AUGUST DATE FOR 
ADD-ON. 


2 AND 3-PART HARMONY 

MUSIC 

SOFTWARE! 

Three 60-minute programming 
cassettes now available! 

1. Bach’s 15 Two-Part Inventions1 
Christmas Music; 27 Carols! 

3. Scott Joplin Ragtime Piano! 

s 9 50 Each 
/L i\ GEORGE mOSES CO. 

* P.O. Box 686* Brighton, Ml 48116 


£ 


= s-o = 


ARCAD IAN 

Robert Fabris, yellow ribboned 
The SOURCE TCD 959 
3626 Morrie Dr. 

San Jose, CA 95127 
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Volume 3 Number 5 


PREPARATION of the ARCADIAN has been modified slightly by the obvious 
use of the COMPRINT printer for text as we I I as programs. I am using 
the MUSE “SUPER-TEXT" word processor on my Apple to prepare this 
issue. Aside from being able to type the material and then store it 
for future use or revision, the output is nicely justified so that the 
right side margin is neat. 


WEST COAST COMPUTER FAIRE is coming up shortly, due in San Francisco 
on the April 4 weekend. Brooks Hall. 

I shalI have booth 09 there, up against the walI, and we (Dick Houser 
and I) shall have all the items we have been talking about in the 
ARCADIAN there, maybe some new ones as well. If in the area, please 
drop by to visit with us. Local subscribers are invited to drop me a 
card if you can help out for an hour or two at the show. 


TELEPHONE NUMBERS here at headquarters are (408) 258-458S for the 
private line, 272-2364 gets the rest of the family. 


CORRECTIONS required to previous programs. 

GOLF Bob Hensel writes that the following should be added to 
the program after the listing shown in the last issue: 

:RETURN;NT=0;BC=25;FC=92;&(0)=170;&(1 )=170;&(2)=7;&(3)=7;INPUT 
N;&(9)=20;GOTfo 100 

\,The inputted N -is*-the number of players, 1 to 3$^.Tfefcive to 
apologize here, this line, which was on Bob's tape, does not print 
out when you list the program, and I didn't notice it. 


GRANDFATHER CLOCK In line 15, the values of @(14) and @( 15)1 
should be swapped - it goes bong-bing instead of bing-bong. "f 

MUSICAL STAFF Line 120, last statement should read GOTO 850 


The zero dropped out^ 

discontinued this product: . - Supplles » have temporarily j 


THE DIGITAL COUCH PROGRAM WAS REWRITTEN FOR THE BALLY FROM A PROGRAM BY 
DAVID TUNBO. ORIGINALLY PRESENTED IN CREATIVE COMPUTING, AND WRITTEN FOR THE 
OHIO SCIENTIFIC CHALLENGER II. 

THE DIGITAL COUCH PROGRAM TURNS YOUR COMPUTER INTO A PSYCHIATRIST. IT DRAWfi 
A PICTURE NOT UNLIKE AN INKBLOT AND GIVES THREE CHOICES AS TO WHAT THE PICTURE*? 
LOOKS LIKE. THE PROGRAM KEEPS SCORE AND RATES THE PLAYER WHEN THE "TESTS” ARE 
OVER. 

THIS PROGRAM IS NOT TO BE TAKEN SERIOUSLY, AND WOULD PROBABLY BE BEST PUT 
TO USE AT PARTIES, ETC. 

THE CHOICES GIVEN, AND CONCLUSIONS REACHED, ARE RANDOM. 

■MUML THANK YOU, 

BOB WEBER . 


(g) iqgl Rokf/t Fa\ons 
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Bob Weber 
659-4 Suiartout Rd. 
Rlgonac, MI -48001 


;GOSUB E 


DIGITAL COUCH ■ — 

^4c™^ C xT 3 Tl UB 10B5:S - 0:FOR ' ,;r - 1 '*» KiCLEflR ;X=30;V=20;B=0;BC=RND <2sgg 

20 ft=RND (4);IF A=4X=X+3;IF (X>70)+(PX(X,Y))A=RNB (3);X=X-3 
30 IF R=4G0T0 100 

40 IF fi=3X=X-3;IF (X<0)+(PX(X,Y))A=RNB (2);X=X+3 
50 IF A=3G0T0 100 

60 IF R=2Y=Y+3;IF (Y>40)+(PX(X,Y ) )A=1;Y=Y-3 
70 IF A=2G0T0 100 

80 Y=Y-3;IF (Y<0)+(PX(X,Y))A=0;Y=Y+3 
90 IF R=1G0T0 100 
95 B=B+1;IF B=9G0T0 200 
100 BOX X, Y, 3,3,1;GOTO 20 

200 CY=0;F=0;PRINT "IS THIS A:";C=RND (12);IF RND (3)=2F=C?|il 
210 D=RNB (12);IF B=CGOTO 210 
215 IF RNB (3)=2F=D;G=2 
220 E=RNB (12);IF (E-C)+(E=D)GOTO 220 

225 IF RND (3)=2F=E;G=3 

226 IF F=0F=B;G=2 

230 PRINT "(1) ",;GOSUB Cb1000;PRINT "(2) ",;GOSUB Db1000;PRINT "(3) 

51000 

240 L=KP-48;IF L=GGOTO 400 

250 PRINT "NO, IT’S R”;GOSUB Fbl000;GOSUB (RND (4)+12)bl000 
300 FOR Z=1T0 999;NEXT Z;NEXT J 

WOULD = SRY 100)CK:PRINT ” LET 5 SEE N0W -” ;PR1nt ’YOUR SCORE IS ",#1,H,"X*;PRINT 
I 320 IF H<20PRINT ‘YOU RERLLY RRE R MESS! 

> 330 IF H<40IF H>19PRINT "THRT YOUR BRRIN IS HRLF R BUBBLE OFF CENTER* 

350 IF H<70IF H>39PRINT "THRT YOU SHOULD BE KEPT RWRY FROM SHARP OBJECTS* 

360 IF H>69PRINT "TO GET THIS MRNY RIGHT, YOU MUST BE TWISTED! 

370 ST OP 

400 PRINT "UERY GOOD! THRT’S RIGHT!";S=S+1;GOTO 300 
1000 PRINT "RODNEY";RETURN 

1 fi 0 ^ r J THE D ° CT0R WILL SEE Y0U HOW, ’ ; PRINT "HELLO, I’M GOING TO SHOW YOU 
r* ofc_KJLfc_3 OF PICTURELS. 

1010 PRINT ‘WHEN I RSK YOU, INDICATE WHICH OF THE THREE CHOICESIT LOOKS LIKE TO 

1020 PRINT ‘BASED ON YOUR ANSWERS, I WILL EVALUATE YOUR MIND 
1030 PRINT "HOW MRNY DO YOU WANT?";K=KP-48;IF K<lGOTO 1030 
1040 IF K>5PRINT "MAKE IT EASY ON YOURSELF--NOT SO MANY ";GOTO 1030 
1050 RETURN 

2000 PRINT "SICK STAIR CASE";RETURN 
3000 PRINT "CAT FLYING UPSIDE DOWN“;RETURN 
4000 PRINT "BIRD IN A HALTER TOP";RETURN 
5000 PRINT "PEANUT BUTTER ROCKET";RETURN 
6000 PRINT "DRUNK WITH FLAT TIRE";RETURN 
7000 PRINT "WILTED FIRE PLUG";RETURN 
8000 PRINT "PLATE OF REFRIED BEANS”;RETURN 
9000 PRINT "FROG WITH NUDE";RETURN 
10000 PRINT "CREEPY CANAL";RETURN 
11000 PRINT "NAZI ANT HILL";RETURN 
12000 PRINT "MARTIAN PAGODA";RETURN 

13000 PRINT "HMMMMMMM";PRINT "YOU NEVER HAD A PUPPY AS ACHILD DID YOU? 

13010 PRINT "THINGS LIKE THAT SHOW!";RETURN 
14000 PRINT "THAT IS A VERY REVEALING CHOICE*'*";RETURN 
15000 PRINT "YOUR ANSWER IS NOT CORRECTBUT IT IS MEANINGFULL.";RETURN 
'S90NER P "-RETURN 0 '^ CL ° SE ’ ^ N ° T " ;PRINT " RIGHT - YOU SHOULD HAVE COME TO A 
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TOWER OF HANOI is an old game, originally played with a set of 
rings to be placed on three pegs mounted on a board. The number of 
moves required to shift the pile from one location to the final 
location is equal to 2 -1, where n is the number of blocks. For a 

four-block pile then, the minimun number of moves is 15. I dug into an 
old Johnson-Smith catalog to find the puzzle available there for 35 
cents, but the catalog is 40 years old... 

COMMENTS Bert Holmes writes: I too have had trouble loading at NT=0 
but I found that it only happens when trying to overcopy a previous 
program. This may happen when trying to load a copy of the same 
program if the first line (usually a throw-away for just this purpose) 
is missed due to plug-in or voice Ieader noise. The Bally then sees 
the incoming line as a replacement and must insert and shift the text. 
However, if the BaIly is RESET the program seems to load flawlessly. 
In summary, for entries which simpiy add on to the current program 
without insertion (and need to relocate program within memory) NT=0 
shouId work. 

COINCIDENTALLY to the material received from Bob Wiseman, the 
following comments from Bert Holmes are appropriate. ”I have 

succeeded in making another computer with RS232 I/O talk to the Bally. 
One problem has been that the Bally expects high level input (as from 
the output of a tape recorder), while the output of the computer is 
low level, as expected by a tape recorder. High level is actually 
reduced to low level by voltage division via R3,R2 in the tape 
interface of the Bally. By unsbldering one end of R3 low level inputs 
can be accepted.” Perhaps there.is a relatively simple rewiring of 
the cassette interface which will enable transmission of signals in 
both directions at the proper levels. Note that Bert's comments are 
talking to the situation where the Bally is receiving input only, not 
sending out data. Bert continues that a simple program to pump out 
ASCII characters was needed, plus a need to initialize each session 
with FF (hex) to synchronize the Bally to his other computer (by 
sending out a series of ones). 

APPLE TO BALLY INTERFACE has been developed by Bob Wiseman.(See his ad 
on p.60) The programs he provides are in machine code (insert 

through the Apple's monitor) and they allow you to dump to and load 
from the Bally, and allow Apple keyboard input to go to the Bally. 
The four programs load at $4200,$4400,$4600, and $4300 in theApple, 
but instructions are provided so that you can change these. In 
addition, instructions are also provided in case you have Integer 
Basic instead of Applesoft. Data itself is stored starting at $5000. 
The keyboard input can be run without a disc system and so is worth 
the asking price by itself. 

Ail four routines are combined by means of a "File Handler" program 
that makes it al I work together in a business-1 ike manner. And a 
printer connected to the Apple will give you hard copy as well. 
Connection between the two machines is by way of the cassette ports of 
each. Bob recommends amp I ification of the signals and proposes that 
the cassette recorder be placed in the system to allow its internal 
amplifier to boost the signals enough to register. 
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This is part 2 of Bob 
Wiseman's tutorial on 
tech inques. 

- 


1 



TRICKS OF THE TRADE. 


HERE I WILL ENTERTAIN YOU TO A FEW PROGRAMMING TRICKS I HAVE 
CONJURED UP WITH THE BALLY. 

TRICK 1 - HOW TO KEEP TRACK OF PIECES ON A BOARD GAME. 

RATHER THAN CREATE A TABLE OF WHO IS WHERE, IF YOU ARE 
SHORT OF MEMORY YOU CAN OFTEN USE THE PX(X,Y) COMMAND. 

SUPPOSE WE HAVE THREE POSSIBILITIES: 

NOBODY, AN "X", A "O". 

CHECK TWO SQUARES WITH THE PX COMMAND: THE BOTTOM CENTER 
AND THE BOTTOM LEFTMOST. COMPUTE P=PX(L,B)+PX(C * B). 

THIS WILL GIVE US THE CORRESPONDING ZERO, ONE, AND TWO FOR 
SPACE, "X H AND "0". 

THIS WILL NOT BE FAST AND SHOULD ONLY BE USED WHEN 
MEMORY IS IN VERY SHORT SUPPLY. 

TRICK 2 - CODING THE FANCY "IF" STATEMENT. 

WHEN EVALUATING LOGIC STATEMENTS, BALLY BASIC ASSIGNS A TRUE 
VALUE TO ANYTHING BUT ZERO. STATEMENTS THAT EVALUATE TO ZERO 
ARE FALSE. SIMILARLY, IF SOMETHING IS TRUE, THE ARCADE GIVES IT 
THE VALUE ONE. IF SOMETHING IS FALSE, THE VALUE ZERO. 


10 A=0 

20 IF APRINT"HI THERE 

THE VALUE OF A IS ZERO, WHICH IS FALSE, SO THIS WILL NOT PRINT 
ANYTHING. CONVERSLY, 

10 FOR N=-l TO 2 
20 IF NPRINT"HI THERE 
30 NEXT N 

THIS WILL PRINT "HI THERE" FOR THE NON-ZERO VALUES OF N (-1,1,2). 
THREE LINES WILL BE PRINTED. NOW WE CAN GET FANCY. SUPPOSE THAT 
WE WANT TO PRINT SOMETHING IF A IS 4 OR IF B IS 5. FIRST OF ALL, 
THE STATEMENT: 

10 C=(A=4) 


WILL SET C EQUAL TO 0 (FALSE) IF A IS NOT EQUAL TO 4. 
EQUAL TO 1 (TRUE) IF A IS EQUAL TO 4. SO WE CAN SAY: 

10 C=(A=4) 

20 D=(B=5) 

30 IF C+DPRINT"HI THERE" 


C WILL BE SET 
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NOT-E THAT C+D WILL BE ZERO ONLY IF C AND D ARE BOTH ZERO 
SO C+D IS THE SAME AS (C OR D). TO SIMPLIF? TH?i, WE MN WRITE 

10 IF (A=4)+(B=4)PRINT"HI THERE 

SO A "+" WORKS LIKE THE WORD "OR". AS YOU WOULD EXPECT, THE 
* WORKS LIKE "AND". JUST AS ZERO TIMES ANYTING IS ZERO 
A A crnA?- D ANYTHING 13 STILL FALSE. IF WE WANT TO PRINT IF 
A EQUALS FOUR AND B EQUALS 5, WE CAN WRITE: 

10 IF (A=4) #• (B=4) PR I NT "HI THERE 

BIZZARE - UNREADABLE COMBINATIONS. 

j" E pj T IS A FINE tradeoff between keeping it simple and making 

10 IF ((A<4)*(A>0))+<A>10)PRINT"HI THERE 

THIS WILL PRINT IF THE VALUE OF A IS 1, 2, 3 OR IS GREATFR thaw ia 
ifl!cD 0FTEN STRUCK BY BRILLIANT FLASHES THAT MAKE PERFECT SENSE 
E «TER, WHEN TRYING TO DEBUG, I SUFFER THE "WHO WROTE THIS 

Jf^SI'BEST^yCE^HAT^^AVE^O^FFER" ^ N ° TES 


Bally 500 is a game of driving 
skill for 2 or 3 players. One 
player controls the turns in 
the road with KN(4). The 
other players control the cars 
||»ith KN( 1 ) and KNC2). Road 
•flocks, accidents, and other 
are randomly placed in 
your path. If you hit one your 
car is destroyed. The object 
is to see how long you can 
sta y on the road, and beat 
your opponent. An elapsed time 
is indicated at the top left of 
kthe screen. 

Skill I eve I :3(hard )-10(easy ) 


,/,v Next issue will have a comprehensive report of the latest Dearborn User 
i- Gr ° Up mee ting, at which location the Add-Under was shown and thoroughly 
% gone over. 3 M 



We wiI I also have 
addition. 


ajor advertising for the VIPER i 
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100 

105 

110 

190 

200 

242 

245 

247 

249 

299 


301 


305 

310 

350 

380 

390 


700 

1000 

1005 

1010 

1050 

1055 

10B0 

1900 

1905 

1907 

1910 

1920 

2000 

2002 

2005 

2010 

2020 

2030 

2040 

2050 

2060 

2100 

2105 

2110 

2120 

2130 

2140 

2150 

2160 


:RETURN ;CLEAR ;A=0;B=0;P=0 

X=0;Y=10;Z=-10 

NT=1;S=0;T=0 

BC=126;FC—249 

GOSUB 4000;BOX 0,0,50,80,1 

X=X+KN(4 )c20 

Y=Y+KN(2)c20 

Z=Z+KN(1)c20 

T=T+1;S=S+1 

BOX X,-39,50,8,1 

BOX X,-36,2,2,3 

IF P>0BOX X,-39,6,8,3;P=P-1 

IF A=0BOX Y,-8,2,4,3 

IF B=0BOX Z,-16,3,4,3 

IF T<LGOTO 299 

C=1;IF X>0C=-1 

GOSUB 1800+100bRND C10) 

GOTO 299 

IF T-L=0T=0 

CY=-40;CX=-77;PRINT 

CX=-70;CY=40;PRINT #1,S 

IF A>0IF B>0GOTO 3000 

IF A>0GOTO 380 

IF PX(Y,0)=1GOSUB 1000 

BOX Y,0,2,4,3 

IF B>0GOTO 10 

IF PXCZ,-8)=1G0SUB 1050 

BOX Z,-8,3,4,3 

GOTO 10 

CX=Y;CY=0;PRINT 



A=S 


2200 .TREE 
2205 C=Cb40 

2210 BOX X+C,-28,2,2,3 
2220 BOX X+C,-30,4,2,3 
2230 BOX X+C,-32,6,2,3 
2240 BOX X+C,-34,8,2,3 
2250 BOX X+C,-36,10,2,3 
2260 BOX X+C,-40,2,6,3 
2270 RETURN 
2300 .SIGN 
2303 IF P >0RETURN 
2305 C=Cb50 

2320 BOX X+C,-29,12,12,3 
2325 BOX X+C,-29,8,8,3 
2330 CX=X+C;CY=-29;PRINT "P", 

2335 LINE CX-9,CY-4,4;LINE CX-3,CY+2,1 

2336 P=15 

2340 BOX X+C,-39,2,8,3 
2350 RETURN 
2400 .LOG 

2410 BOX X-3,-38,24,5,2 

2415 BOX X-10,-41,2,4,2;BOX X+3,-41,2,4,2 
2420 RETURN 


2500 .CRASH 


GOTO 1060 
CX=Z;CY=-8;PRINT 
B=S 

NT=10;MU=67;MU=67;MU=67;MU=67;NT=1;RETURN 

.TRUCK 

C=Cbl2 

BOX X+C,-32,5,5,3 


BOX X+C+4,-32,1,2,3 
BOX X+C-4,-32,1,2,3 
.CAR 

IF ABS(C ) >1GOTO 2010 
C=Cb12 

BOX X+C,-39,5,8,3 
BOX X+C+4,-37,1,2,3 
BOX X+C-4,-37,1,2,3 
BOX X+C+4,-41,1,2,3 
BOX X+C-4,-41,1,2,3 
RETURN 
.HOUSE 
C=Cb45 

BOX X+C,-38,12,10,3 
BOX X+C,-32,8,2,3 
BOX X+C,-36,16,2,1 
BOX X+C-2,-39,2,2,3 
BOX X+C+2,-40,2,4,3 
RETURN 


2510 BOX X+8,-28,10,4,2 

2520 GOSUB 1900 

2530 RETURN 

2600 C=-lbC;GOTO 1900 

2700 C=-lbC;GOTO 2000 

2800 RETURN 

3000 .END 

3005 CY=-40;CX=-23;PRINT 
3010 CLEAR ;CY=24;PRINT 


Bob Hensel 

8428 Ingleside Awe., S 
Cottage Growe, MN 55016 


3020 PRINT 
3030 PRINT 
3040 PRINT B,■ 
3050 STOP 
10 .TITLE 
4010 CY=0;PRINT 
4020 PRINT " 
4025 PRINT 
4030 INPUT “ 


GAME OUER";FOR K=1T0 1000;NEXT K 
SCORE";PRINT 

PLAYER 1 PLAYER 2 


BALLY 
BOB HENSEL 


5 0 0“;CY=-8;CX=-6;PRINT "BY 


SKILL LEUEL="L;CLEAR ;RETURN 


$7 
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DEFUSE 


NEED INSTRUCTIONS?" 

460 PRINT 


PRESS 


PRESS 


FOR YES“ 


FOR NO* 


100 

110 

120 

130 

140 

1S0 

160 

170 

180 

190 

200 

210 

220 

260 

270 

280 

290 

300 

310 

315 

320 

330 

340 

3S0 

360 

365 

370 


410 

420 

425 

426 
430 
440 
450 


. DEFUSE 

. BY DIETER HEINERMAN 
CLERR 
NT=2 

BC=8;FC=100 
PRINT ;PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 

FOR H=1T0 2400 
IF &(23)=8G0T0 90 
IF &(22)=8GQT0 260 
NEXT H 
FC=9;GOTO 40 
CLERR 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
CLERR 

R=RND (100);B=RND C100) 

C=RND (100);IF R>0GOTO 310 

IF B >0GOTO 310 

IF C=0GOTO 280 

D=0;E=0;F=0;G=0 

PRINT 

SIGNRL",10000-(C fl+B+Cb100) 
LONG",D 
WIDE",E 
HIGH” ,F 
SECONDS”,G 


DEFUSE is a three-dimensional 
guessing game where you have to ■'* 
locate a point in the center 
using 'hot-cold' type clues. 

WIDE",B 
HIGH",C 


“,G,”SECONDS";GOTO 490 


” YOU RRE IN R GOUERNNMENT" 
"EXPERIMENTAL BUILDING WITH" 
" 1,000,000 ROOMS IN IT." 

“ 100 LONG(0a99 ) " 

“ 100 WIDEC 0a99)" 

" 100 HIGH(0a99) 

" IN IT A BOMB IS HIDDEN " 

“ THE BOMB SENDS OUT " 

" SIGNALS THAT GET STRONGER" 
“ RS YOU GET CLOSER" 

YOU HAUE 200 SECONDS 
TO DEACTIUATE IT 


470 PRINT 
490 PRINT 

495 PRINT "WANT TO PLAY AGAIN?” 

500 PRINT “ PRESS 1* 

505 PRINT 

510 IF &(23 )=8G0T0 260 
515 GOTO 510 
520 GOTO 800 
525 PRINT ;PRINT 
530 PRINT " BOMB DEFUSED AT 

540 IF D>99G0T0 610 
550 IF D< 0GOTO 610 
560 IF E>99G0T0 610 
570 IF E<0GOTO 610 
580 IF F >99G0T0 660 
590 IF F<0GOTO 680 
600 GOTO 315 

610 PRINT ” YOU WALKED OUT A WINDOW" 

620 PRINT "ON THE";IF F<4G0T0 740 
625 PRINT F,“TH FLOOR!!!!■ 

630 PRINT " YOU WERE KILLED AND" 

640 PRINT 200-G,"SECONDS LATER" 

650 PRINT “ THE BUILDING BLEW UP!!!*;GOTO 490 
660 PRINT “ YOU ARE N0W",Fb9 

670 PRINT “ FEET IN THE AIR!!!!";GOTO 630 "f 
680 PRINT * YOU ARE NOW “,-lb(Fb9) 

690 PRINT * FEET UNDERGROUND!!!!";GOTO 630 
740 IF F=lGOTO 770 
750 IF F=2G0T0 780 
760 IF F=3G0T0 790 
(D+E+Fb100)) 


=G+10;IF A#DGOTO 400 


770 PRINT 
780 PRINT 
790 PRINT 
800 CLEAR 
810 GOTO 490 


1ST FLOOR*;GOTO 630 
2ND FLOOR*;GOTO 630 
3RD FLOOR";GOTO 630 


PRINT 
PRINT 
PRINT 
PRINT 
PRINT 
PRINT 

INPUT D,E,F;CLEAR 
IF B#EGOTO 400 
IF C=FGOTO 525 
IF G=200GOTO 420 
GOTO 540 

PRINT * BOOOOOMMM !!! YOU BLEW IT 
&<16)=255;&( 17)=255;&(18) = 13S;&( 19)=66;&( 21)=255;&(22)=255;&(23)=255 
FOR X=7T0 127;BC=X;NEXT X;FOR X=16T0 23;&(X)=0;NEXT X 
PRINT * THE BUILDING BLEW UP * 

PRINT “ THE BOMB WAS AT “ 

PRINT " LONG",A 


! Dieter Heinerman 
505 4th Awe SW 
Calgary,Alberta, 
i2P oj8 mam 


#1511 

Canada 
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Th e memory system of the Bally, and the Bally basic language 
thatgoes along with it, only works in 1800 bytes of space. Physically 
adding memory chips to the system .wiring them into the circuit, will 
have no effect because the Bally basic 'can't count higher that 1800' 
when it comes to looking for memory space. This has been a ma jor 
stumbling block in the way of making this machine into a useful 
computer. Last year, the Blue Ram was developed to get around this 
block by making it possible to program machine Ianguage codes into the 
Bally, up to 4K. Bally Basic still could not address this space, but 
we thought that expansion of user knowledge into the area of machine 
code programming would be beneficial. R more universal expansion of 
the system would be to remove the 1800 byte constraint in the 
language. We then pressed ahead with what I have been calling the 
Extended Basic, which is a complete rewrite of the original. By 
doubling the memory space of the chip to 8k, we could also eliminate 
some of the space-saving tricks of the original, and get the four 
colors on the screen and other features. Work on the production of 
this language is progressing and we hope to have it available by 
mid-year. 


Meanwhile, once the Blue Ram was placed in the hands of users, we 
discovered that Bally Basic statements could also be placed in the 
Blue Ram by means of some simple statements, and that means that you 
.can write programs just as before, but make them three times as long, 

•or more complicated, or with more sound or color, etc.,as before. This 
> te .£tl» i q ue is included in tpe>Operating System tape nou available. 

Coming into production in the immediate future is the UIPER. 
This scheme allows greater memory expansion than the Blue Ram, at a higher 
price. The construction of this machine allows the expansion of the unit by 
adding individual cards, each containing the feature or accessory control 
that you are interested in. This is the method used in the fipple computer. 
The design of the base system must then contain enough hardware on it to 
support all the cards that could be added, and cost accordingly. However,, 
the individual accessory cards would then be relatively inexpensive and be 
completely compatible, ready to slip into their little slots. 


CONTEST FOR PROGRRMS is being planned by RstroOision. If you 
are looking for an opportunity to gain some recognition, as well as 
perhaps making a little money, write to fistroUision for their 
up-coming “Ruthorship Guide” which will outline the rules, etc., for 
their contest. They plan to have a number of categories (art, utility, 
game,etc.) with winners in each. R top prize of S10.000 will be in the 
j offing. Write to 6480 Busch Blvd., Suite 215, Columbus, OH 43229, 
attn: D. Dawson. 

CRRTRIDGE NEWS The only real news is that the GRLRXIRN game goes 
into production 1 March, and a new game titled PIRATE'S CHASE is in 
the works. The GRLRXIRN will have a score storage scheme where four 
players 's score will be kept by the machine as each plays the 
computer individually (much as a pinball machine does). 










Ads 

ARCADIAN PROGRAM TAPES are available from Dick Houser 635 Los Alamos 
five, Livermore, CA 94550 as follows: Uolume 1 (20 programs); Uolume 2a 
(22 programs, to p.42); Uolume 2b (20 programs, from p.48) at #25 
each. Individual programs also available at #1 plus tape and postage 
cost, minimun order, #10. Send for Iist/order blank. 

APPLE-BALLY INTERFACING PROGRAMS allow communication between Bally 
and Apple (and use of Apple disc and printer) for storage and loading 
of programs. Listing at #5., with all instructions; or on disc (DOS 
3.2.1) at #15 including all documentation and Iibrary of programs. 
Bob Wiseman 118 St.Andrews Dr. Cincinnati, OH 45245 

ABC HOBBYCRAFT want everyone to remember that they are still selling 
the Bal ly and its accessories, as we I I as software by L&M and George Moses. 
They also have a user group going for neighborhood owners. 2155 E. Morgan 
Ave., Evansville, IL 47711 

Protection devices to shield your Bally from inadvertent erasures or 
entries. These plastic covers prevent operation of the keypad or the reset 
button. Send #2. for the pair, postpaid, to Dave Stocker 333 Coronado Dr., 
Mt. Uernon.IN 47B20 ■■■' 

Long-time outlet SCHWENK 
jENTERPRISES report that they are still , 
selIing Arcades and Uideocades at discount | 
prices by mail. Write for data to 6988 
Lincoln Creek CircIe,CarmichaeI, CA 
95608. (916) 944-2001 

USER GROUP NEWS Northern NJ area, cal I Rob 
Rosenhouse at (201) 755-2289. 

Error in last month's address for the DC 
group, Jerry Heere's location is Sinking 
Spring, PA. 

SPECTRE is a software -developing 
Company that is looking for ideas and want 
to hear from subscribers who have 
thoughts on what the Arcade and Add-Under 
units should provide. As a result of the 
| recent Dearborn meeting, a questionnaire 
has been developed, and copies are 1 
available from Spectre at 14430 Barclay, 

Dearborn, MI 48126. 

= 60 = 


X NEED MORE BYTES? X 

X NOW! ! ADD 4224 MORE BYTES OF STATIC RAM! X 

X WITH THE BLUE RAM ADD OH! ! '4 

X MOOIFY AND WRITE GAME CARTRIDGES TO TAPE!! V. 

X NEW OPERATING SYSTEM PROVIDES 5192 BYTES X 

X OF BALLY BASIC WITH EDITOR,PARAMETER X 

V. PASSING AND MUCH MORE! X 

X « 

X PRODUCT KIT WIRED X 

X THE BLUE RAM . *140.00 ... *180.00 X 

X KEYBOARD . *24.95 - *89.95 X 

X BLUE RAM OPERATING SYSTEM (TAPE! .. *9.95 X 

X BSR INTERFACE . N'A . *19.95 X 

X MODEM ADAPTER . *69.95 - *89.95 X 

X WITH PRINTER INTERFACE *79.95 .... *99.95 X 

X * ALL OF THE ABOVE COME COMPLETE WITH X 
V. PROGRAM TAPES AND DOCUMENTATION. X 

X *4 

X MORE COMIMG ... X 

X * * * * FAST GRAPHICS IN COLOR * * » * X 

X A 'HUMAN' VOICE TO ENHANCE YOUR GAMES! X 

X * * * * AN 8K EXTENDED BASIC * * * * X 

X ORDER FROM THE ARCADIAN OR X 

X PERKINS ENGINEERING X 
X 1004 PLEASANT AVE. BOYNE CITY,MICH. 49712 X 
X ‘4 


ARCADIAN 

Robert Fabris, word processing 
3626 Morrie Dr. 

San Jose, CA 95127 


cvJxSS 
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April 15,1981 


say. This has been a very interesting month, with 
one atop another. The last issue was sent out a 
rush at the printer's, what with everyone trying to 
to the postage increase. Then I received an 
conference in Chicago with AstroUision and the 


personnel (report below), ftfter that we had the West Coast Computer 
Faire to get ready for (report below) and then this issue to prepare. So 
there were a Iot of things, happening, and here are the stories. 


REVIEW OF PRODUCTS BY ASTROVISION. Four of us attended a meeting in 
Chicago on March 20. Fred Cornett, George Moses, Mike Peace and myself 
represented the thousands of users of the Bally Arcade at a sales meeting. 
About 35 distributor organization personnel were there to get the low-down 
on near term and far future plans. The schedule first: 

May 15 Release of the Arcade plus 
Aug 1 Release of the AstroVision Basic 

Oct 1 Release of the Add Under 

198? Release of a 28000 Arcade unit 

A. The ARCADE PLUS is our familiar Bally friend with a new motherboard. 
Functions are the same but some parts have been rearranged to alleviate the 
heat problem and therefore make the unit more reliable. As a result, the 
shields have been modified and the whole thing under the cover looks 
different. The reason for the "PLUS" marking is the fact that the 
AstroUision Basic will be included without additional cost. (The cost of a 
two-handle unit is still 300.) ((But Montgomery Ward sales will not 
include the Basic.)) 

B. The new BASIC cartridge is virtually complete, and only needs the 
final go-ahead to be placed into production. I mentioned this cartridge on 
page 40, and I had the opportunity to review one a couple of days before 
the meeting. It does transfer data at 1800 baud, six times faster than the 
current unit. It includes an EDIT function, wherebye you can recall a line 
number and make a correction to the commands located there. A special 
command function allows you to step through the individual letters/numbers 
in the line. Another feature is a TRACE mode - if a program is running, by 
pressing LIST, the next line to be executed will show up on the screen and 
then the computer will perform the operation, then the next line, the next 
operation, etc., so that in the case of program debugging, you can see if 
the program is doing what you expect it to ( it always does what you tel I 
it to, but that may not be what you expect ). 

Many of the commands having to do with the sound generating system 
have beem revised from a “ &(21)=n " mode to a " NA=n “ mode, saving 3 
bytes each. 

The cassette interface has been moved to the BASIC cartridge itself. 
There is a single jack at the top of the cartridge for a single cable to 
the recorder. You have to switch the cable at the recorder between the 
input and output jacks. 

AlI of this has to be paid for in some way. The $ mathematical system 
is gone; the :INPUT n system for program identification is gone; the screen 
scrolling during tape loading is gone; probably others. 


(& ("alori* 
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The 1800 baud system is not at all compatible with the old 300 baud 
system. Not to worry, fls a result of every reviewer's comments, a 'hook' 
was left in the system to allow the new Basic to open hand controller port 
three so that the old tapes can be loaded into the memory. Then the program 
can be ^out^oaded onto a new tape at the 1800 baud rate. It does mean that 
n 9 to seM y° ul ~ software to "new" people will have to 
them, because they won't have the old cassette 
ill Iist at S55. 


those of you 
convert your tapes for 
interface. The new Basic i 


Tom Wood is finishing up the job of disassembling the new Basic, and we 
will be able to announce what we will have discovered in the next issue 
and also let you know about copies for your own use. 

WEST CORST COMPUTER FRIRE took place RpriI 3-5, and neighborhood RRCRDE 
owners found Dick Houser and myself manning the booth at spot 08. We also 
had help from Tom Wood and Rndy Rrmstrong as Dick and I would make 
occasional excursions to see what was interesting. fit the end of the 
period, we found that 85 people had signed the visitor's book. We had one 
fircade unit running almost full time with Galactic Invasion, plus another 
one to show off different programs made up by our subscribers. We also had 
-the Blue Ram there with its keyboard and the BSR controller. The latest 
innovation from Perkins Engineering was also on display, the Bally 
motherboard with 39 extra IC chips to allow High Resolution color displays. 
Another prototype piece of hardware was the UIPER 1EK memory expansion 
board. So there were plenty of things to show Dan Dawson, President of 
ftstroUision, when he and vice-President-Marketing Ray George visited the 
booth. (Another welcome visitor was Tim Hays, chief programmer at Sebree's, 
whose booth was really moving the Rtari material. 

We could have sold a lot of hardware if we had any£ “Galactic Invasion" 
was a big hit with all - there was a I ways a crowd around the TU when we 
kept the game in operation. The fine figures, sound, and animation were' 
appreciated especially by those visitors whose own game programs had little 
more than boxes to be manipulated. There were quite a lot of questions 
about “fire they still making the Arcade? "Where can I get the games?" 

I appreciated the opportunity to chat with other magazine publishers - 
Wayne Green of KILOBAUD/MICROCOMPUTING who is coming out with a 
non-computer's computing magazine in the near future - Dave fihI of CREATIVE 
COMPUTING who's March issue had a Bally history article, and who's comments 
were most interesting - and dapper John Craig of INFOWORLD who had a most 
attractive young lady on his arm and was busy with plans for his Computer 
Fair/Flea Market in San Jose, RpriI Z5. j 


EXTENDED BASIC 
Ianguage (in 8K). 


have in hand a tape that contains the Extended Basic \ 
This' tape wil I be used to generate both tape and rom 
■ersions, to be compatible with UIPER and BLUE RAM memory additions, as 
we^l as being usable in the basic machine as well. You will be notified 
when these are available. 

Found in the mouldy pages of an ancient copy of Captain Billy'g 
May the Artesians keep a head on your beer! 

- £2 - 


WhizBang: 
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SOFTWRRE IS THE GAME I was quite interested to see that the distributor 
group recognized the value of software to the sell-ability of the Arcade 
game. Since each Arcade will come with the Basic, each and every purchaser 
is a potential customer for your software. Once the novelty of the 
included games wears off, they will try the Basic, and possibly get 
'hooked' . This paragraph is directed towards the subscriber who has not yet 
acted seriously on the idea of producing a program that can be marketed. If 
you have an idea for programs that you think have some potential, drop me a 
line. AM kinds of programs are needed - just pop into a computer store or 
read the ads in Kilobaud or Creative Computing to see what's on sale. Write 
something similar in AstroUision Basic. Sell it... 

PROGRAMMING CONTEST Authorship ManuaI is still in work, reports Dick 
Ainsworth, its author. Dick is hard at work on the new AstroUision Basic 
Manual, one which will be considerably more comprehensive than the last 
one, he assured us. 

The software workers are also working on such programs as "Peckman", 
"Gorf", and "Wizard of War". These full-size game names will change as the 
units are re I eased. 

ALTERNATIUE ENGINEERING CORP. sent a production sample of their VIPER 1GK 
RAM card to be displayed at the Faire. (see ad p. G9) It consists of 16 
integrated circuits, a 10MHz clock chip, and two sets of DIP switches on a 
4x6 plug-in card. The workmanship is excellent, and so is the parts 
quality. Most of the IC's are LS type. This board (and system) its 
compatible with the Blue Ram softuara^l 

PERKINS HI-RES BOARD was also received just in time for the show. This 
board is the standard Bally motherboard with a number of ICs added, most by 
piggy-back technique onto existing chips. Many extra connections are made 
to make the item 'work'. When powered up, the picture we normally see 
filling the screen was reduced to one-fourth the size, and occupied the 
upper ,1 eft quadrant of the screen. There were-a number of big eyes at the 
Faire when they saw the tiny type_, still 5x7^ but so much smaller. 

A New Item From Perkins Engineering: 

WE ARE PLEASED TO 

ANNOUNCE ANOTHER ENGINEERING BREAKTHROUGH - HIGH RESOLUTION GRAPHICS. THE 1 
"HI-REZ ADD-IN" FROM PERKINS ENGINEERING USES 39 ADDITIONAL CHIPS TO 
EXPLOIT THE HIGH RESOLUTION CAPABILITY OF THE BALLY CUSTOM CHIPS. THE NEW 
CHIPS ARE ADDED TO THE BALLY MOTHERBOARD IN A WAY WHICH ALLOWS THE REGULAR 
CASE TO GO BACK ON. A PROTOTYPE MODIFIED BOARD WAS DEMONSTRATED AT THE 
COMPUTER FAIRE. HERE'S WHAT YOU WILL GET: RESOLUTION MODE IS SOFTWARE 
SELECTABLE AT LOW NORMAL FOR EXISTING PROGRAMS, MEDIUM (160X204, SIMILAR TO 
MATTEL), AND HIGH (320X204, BETTER THAN APPLE). THE 39 CHIPS INCLUDE AN 
EPROM FOR FIRMWARE SUPPORT OF THE NEW MODES AND 12K OF ADDITIONAL MEMORY. 
THE SOFTWARE MODE SELECTION ALLOWS THE INDIVIDUAL PROGRAM TO CHOOSE ITS OWN 
RESOLUTION FOR FULL COMPATIBILITY WITH EXISTING GAME CARTRIDGES AND BALLY 
BASIC. FOR BLUE RAM OWNERS, A TAPE WILL BE INCLUDED TO PROVIDE MEDIUM 
RESOLUTION BASIC WITH FOUR SCREEN COLORS AND 7K PROGRAMMING AREA. PRICES 
WILL BE IN THE RANGE d?F *250 FOR THE KIT AND *300 WIRED ( YOU SEND IN YOUR 
BALLY FOR MODIFICATION). AVAILABILITY WILL BE ANNOUNCED IN THE NEXT ISSUE. 

CORRECTION to ALCHEMISYMMETRICAL ART (p-SsTchange line 30: 

IF M > 1 BC = 4 and FC = RND(32)x8+(2xC)+4 

- 6 3 - 











Michigan Bally Users’ Group gets a look 
at Zgrass'32 “add-under” for the Arcade! 

by George Moses and Brett Bilbrey 

For about a month we had been sending out letters to members of the Michigan B.U.G. and interested par¬ 
ties in neighboring states that it was time for another users’ group meeting. The last one had been in Oc¬ 
tober and Astrovision had sent two representatives to answer questions about their takeover of Bally’s Con¬ 
sumer Division and to show off some of their forthcoming game cartridges. You read all about it and saw the 
photos in the November issue of Arcadian. For this meeting, scheduled for February 8, Dave Nutting 
Associates, designers of the Bally Arcade and the new Zgrass-32 had promised to send a representative out 
from Chicago with their amazing new computer. 

News like this brings all the Bally Arcade owners out of the woodwork! The phone rang steadily for two 
weeks before the meeting. People had new hope. Some had purchased other computers as they tired of 
waiting for Bally to keep their promise to expand the Arcade. But these were the people who were most ex¬ 
cited about this meeting! And they promised to come by the carload. 

Saturday morning, February 7, the day before the meeting we went to Detroit Metro Airport and picked up 
Craig Anderson from Minnesota and Steve Wilson from Ohio. They came the farthest to attend. At 6 pm that 
evening the George Moses household was abuzz with a crowd of friends showing off software. Craig Ander¬ 
son, Brett Bilbrey and Steve Wilson were doing some unimaginable things to the Arcade on George’s dining 
room table when the doorbell rang. It was Scot Norris from Dave Nutting Associates with his wife, Cheryl 
looking a bit tired after a 6 hour drive. We opened the hatchback of his car and there among the luggage was 
the Zgrass-32. Tired or not Scot couldn’t wait to plug it in and give us a little demonstration of Zgrass before 
dinner. He had only had a week of working with this computer prior to the meeting and wasn’t fully versed in 
the new Zgrass language yet, but Scot was able to show us some amazing graphics on our TV screen. 

Scot showed us how macros work and demonstrated the hierarchy of the Zgrass language. A macro is a 
program or subroutine that can run concurrently with other subroutines. The Zgrass-32 can run 127 macros 
at once. This is called “multi-tasking”. You can call any macro, all 127 macros at once, or macros can be pro¬ 
grammed to call each other. When you get the program running the way you want it to you can tell the com¬ 
puter to compile it. That is, it will rewrite the program in machine language, thus eliminating the need for the 
computer to interpret each command before executing it. This results in an amazing increase in speed of 
operation. He then demonstrated the way the Zgrass-32 can display 4 colors at once with a concentric box 
routine that when compiled gave a color show that had a tendency to leave one breathless. With this com¬ 
puter you have more screen area as no area is needed at the bottom for scratchpad. You have 102 pixels of 
vertical display and 160 pixels horizontally with 2 bits assigned per pixel for memory. This is the same as Bal¬ 
ly Basic resolution except that the full 4K of memory is used for dynamic screen RAM. The entire ROM inside 
the Arcade is ignored and the Zgrass-32 uses its own scratchpad RAM within the keyboard so you don’t need 
to borrow any screen RAM. Scot showed how interrupts could be used for updating graphics for smooth 
animation. Brett Bilbrey recently showed us this is possible with the present Arcade using machine 
language programming techniques he and Dave Ibach pioneered, but with this new computer it’s so easy it’s 
a snap! 

Speaking of SNAP, that’s the name of a new command you get with the Zgrass-32. Here you can snap an 
area of the screen display and store it in memory and display that image wherever and whenever you call it. 
You can write 6 macros that store 6 pictures of a gunfighter walking, for instance. Using multi-tasking you 
. could display them in sequence for the visual display of an animated figure. You can also tie any figure or 
SNAPped image to the hand control and make it move at your command. 

The self help routine was demonstrated. If you’re not sure about the format of a command you just type in 
the name of the command and the word “HELP” and the computer will ask you for the parameters required 
so you don’t have to grab for the instruction manual each time you begin to use an unfamiliar command. The 
production line prototype Zgrass units hadn’t been built yet, so what we saw was still in the lab-development 
state. The finished prototype will have BOX, LINE, CIRCLE and POINT commands. Not many computers can 
draw graphics as fast or as easily as the already existing Bally Arcade. And the Zgrass-32 puts it far ahead of 
the rest. 

The cassette tape interface is built into the computer and runs at 2000 baud. It differs from the interface 

I we have now in that it is not a wave scanner. All it looks for is sound wave peaks and could care less what 
shape they’re in. So it’s a bit more forgiving than what we’ve had to tolerate in the past. The interface seemed 
to write more reliably to tape when the jack was plugged into the auxiliary plug than when usinq the mike 
plug. 

Two RS232 ports will communicate with disc drives and pripters. One thing we’d like to see is a parallel 
printer port that would handle a standard Centronics printer. Th6' more expandability it has the more saleable 
the computer will be. The character set needs some refinement from what we saw and comments we heard 
at the meeting. The 3x5 pixel characters in low resolution provide 40 characters by 24 lines. Most people 
remarked that they would like to see higher resolution. As we remarked earlier, this was a lab-development 
model. More bells and whistles will be added by the time the assembly line gets cranked up. E.F. Johnson, 
iifteielecfrodiGS firm In Garner Iowa is said to be gearing up for prototype production. 
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The advantages of Zgrass, a graphics language, is that the graphics handling is done by a language that 
was created for just that purpose. Commands for screen manipulation have been tied in with screen inter¬ 
rupts and display techniques so they’re executed much faster and more efficiently than any TRS-80, Apple or 
Atari could ever hope to do. The add-under will access the custom chips in the Bally Arcade, which wilB 
facilitate moving graphics commands thru the Z80 microprocessor. Just as the Bally originally was access!^ 
ble to “hacking” once we figured everything out, it looks like theZgrass-32 will have the same ability with as-’ 
many expansion peripherals attachable as possible. For instance, a parallel port, a serial port, expansion, 
port, disc connector, and dual cassette controllers. The same foresight appears in this design that was in the 
Arcade’s 50 pin expansion connector. 

We also got a look at the science math package, a software feature that’s built-in and is not common in' 
any other computer, featuring 13 digit accuracy. Scot demonstrated the sine and cosine features and drew 
several concentric circles for us. The Screen Editor allows you to use the joystick to move the cursor 
anywhere on the screen and use the knob and trigger to insert spaces or remove characters. You can do the 
same thing with the keyboard using left-right and up-down arrows and you can type in corrections directly 
over the errors. With many computers you have to go looking for a program using addresses to find macros 
or information off a disc. You have to direct the flow. But the Zgrass-32 maintains all internal control to save 
any macros or variables on tape or disc for you in one clean sweep. In other words, it does all your* 
housecleaning for you. The computer already has the software built in to handle multiple program storage! 
and variable allocation with just a simple command. 

Zgrass in no way resembles Basic. It uses no line numbers. It’s easy to learn. And it will write better pro- ; 
grams for the person who wants to see the program come alive visually rather than just print text. Basic was 
written to teach programming to computer students. Zgrass was developed from the start to do computer 
graphics. You get it as standard equipment in the Zgrass-32 for only $599.00, plus the price of your Bally Ar¬ 
cade that must rest on top of it ($299.00). Everybody was amazed at what it would do for its total cost of 
$898.00 (both modules together). When you compare this machine with its 32K RAM and 24K ROM with a 16K 
Apple II Plus that runs $1195.00, it seems like a bargain. As the software appears on the market to make the‘ 
Zgrass-32 do the things it was designed for, our impression is that it’ll be an item in high demand at your ! 
local computer store. THE SUPPORT given the Michigan B.U.G. by Ron 

CRAIG ANDERSON demonstrates the lite pen he ^ U ° ck ° f Tri-County Electronics in Fenton, 

researched and built. It works amazingly well, and hT uT u ° P T 

Brett Bilbrey wrote some software to boot the mall corridor and lines both walls with mult,-level 

Arcade into a high speed mode to read the data as counters supplies dozen of color TVs, poweij 

fast as the lite pen can supply it. cords and keeps a larsc stock of Arcadcs and ac¬ 

cessories handy for everybody. 




THEY’RE HIGH ON ZGRASS - Kim Moses, 
George Moses (her dad), Brett Bilbrey, the 
Zgrass-32 Computer, Scot Norris, Dave Ibach and 
Craig Anderson p** 


G5 


THE CIRCLE drawing function is shown here, 
notice the self help “PROM PT” function 
Zgrass-32. You can see some of the 3x5 character 
set displayed in this photo. 


re. Also 
i of the 
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Oamva/LLmIvL Show: Onlnefacmo BaJMi 

±0 you*. Sieneo. Qompltix. UnJLt $29*95 

18 CftunfLd ana now availabla-All have full 
memony. uAcaje, lot* of. f*ffhljco t tLcjU.oru 8 
-r A Colon. .Any \2) on. caooelle 

I fO 2 ^1% fh m — J. * (T 'f/l /VI 

o< 



.finy f ^r/ an ccLMe^xe 

D ocumenituLLon $10.00 
UnUa 1?L Fnae (jUnlogJ 

8599 Fnamewood Da. 

Dept.2A 

K Newbunmh . ON. 

%7630 

V-Loa 8 flkolen 
Welaa 


: ^ Basic System 

Videocade Games 


Hand Controls 


Coming in August 

: "]T\^ Z Gra^ Keyboard, 


For Free Price 



The Contra! and Upper 
Midwest BaI Iy/RstroUision Club 
(CUMBflC), formed in anticipation of 
the “comeback” of the BaIly system, 
is now conducting a membership 
drive. We've located the regional 
RstroUision rep and are contacting 
dealers as they come on the Iine. 
We've got a core group based on two 
years of mailing Iists and 
correspondence, and are publishing 
a newsletter shortly which will be 
distributed by mail and in the 
stores (dealers) to users in 
Minnesota, Wisconsin, Iowa, North 
and South Dakota. We' I I be holding 
an “Rstrofair" in May - details to 
follow. Interested users please 
write us at: 

CUMBRC 

P.0. Box 21151 

Saint Paul, Minn. 

55121 


- SI 3 BALLY ■ 


‘•.cmy L.iajms 1,0 oay rentor, wno made our 
February meeting a memorable one. 

Jay met with our group before lectur¬ 
ing at the main CACHE meeting. During our 
meeting he showed us a video tape on Ballv 
BASIC and a 7K TERSE keyboard unit. The 
TxlRSw unit was one of the several proto- 
type add-on units. He also demonstrated 
three new videocades, which will be avail¬ 
able in March; Bio-rhythms, Music Maker, 
and Grand Prix. 


At the main meeting. Jay ran a video 
tape on the UV-l Zgrass unit, shared a 
few of his favorite programs and discuss¬ 
ed the Zgrass programming language. He 
also Drought along his latest project, 
GORF.. GORF is a commercial video arcade 
game in which the player tries to get 
through a five-episode space adventure. 

It also incorporates a speech synthesizer. 

I've heard several interesting things 
about the Zgrass 32 unit. The Zerass disk 
system will be compatible with the TRS-80. 
The 32K RAM addition is intended so that 
the user can run CP/K and bypass the res¬ 
ident ROM. Therefore, the Z80 will be ad¬ 
dressing a full 64K RAN; the new add-on 
w ill have a built-in assembler. 


USER GROUP DRTfV CHICRGO Latest word is that Rusty Blommaert and Larry^ 
Smith will be demonstrating their keyboard and memory add-on at the 
National Computer Congress, to be held at Me Cormick Place, Chicago, May 
4-7. They will be a part of the CRCHE group exhibit. 
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1 -MIKE PERCE PRESENTS 

2 .WAUEMAKERS MEM0RY ‘ D00DLE 

10 :RETURN ;FC=RND (32 )b8;BC=RND C32 )b8-l;CLERR ;&C9)=255 
20 R=0;B=0;PRINT ;CX=-45;NT=0;PRINT "MEM0RY D00DLE 

100 FOR X=49T0 56;NT=X-40;MU=X;NEXT X;FOR Z=1T0 G7S 
110 IF &(IB)R=fl+JX(1)b2;B=B+JY(1)b2;GOTO 120 
-115 GOTO 110 

120 C=(R+80 )c2; @( Z)=Cb100+B+44 
130 BOX R,B,2,2,3;IF TRC1)GOTO 150 
140 NEXT Z 

150 FOR X=75T0 60STEP -2;NT=76-X;MU=X;NEXT X;CLERR ;:RETURN 

155 FOR X=1T0 Z;IF TRC1 )RUN 

160 A=@(X)cl00b2-80;B=RM-44 

170 BOX R,B,2,2,3 

180 NEXT X;GOTO 155 

190 FOR X=1T0 900;NEXT X;GOTO 155 


ARCADIAN PROGRAM REWARD We are going to provide an on-going stipend to the, 
author of the 'best program' in each issue of the ARCADIAN. I uji I I send <4 
tape of each issue to a group of five judges who will make some decision a< 
to which of those programs they feel is the 'best', and the selected autho. 
will receive S100, courtesy of AstroUision. The author will replace one 
the judges on the panel, allowing for rotation of that job. 

The full scheme has yet to be ironed out, and some changes may take placi 
before we actually start, but I wanted to pass this word to you so thal 
you could think of some programs to submit. 


The first programs to b| 


iewed under this scheme wilI be 


issue Eight. 


nr-- 


PROGRAM POLICY This is a reiterafi“ wc oT”’a statement made some time ago. 
Programs sent to me for inclusion in the newsletter are not paid for, and 
are assumed to be usable by alI. The monthly payment scheme mentioned above 
will hopefully increase the volume of programs submitted. If so, we will 
increase the size of the publication to suit. But we always need short and 
simple programs that can be used by beginners to help them understand 
computers and the Arcade. 


Computer TWIXT is based on the 3M game. The player with the square has to 
generate a line from one side of the playing square to the other, while the 
"layer with the cross has to work vertically. The computer will draw a line 
you if your new piece is at a certain location from an existing piece. 
...= two-over-and-one-across requirement is i I I ustrated (the 2:1 can be in 
any direction, or 1:2): 


for 


The computer will tell you if your wall extends across the playing square. 
Use TRC1 ) to start a new game. 




I 
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2 
3 
| 5 
6 
10 
20 
30 
40 


90 

110 

130 

140 

150 

170 

200 

210 

220 

230 

250 

2G0 

280 

290 

400 

4G0 

500 

600 

630 

640 

660 

670 

680 

690 

810 

830 

840 

850 

860 

870 

880 

890 

900 

910 

920 

930 

1020 

1025 

1030 

1070 

1080 

1090 

1100 

1990 

1995 

2000 

2010 


.COMPUTER TWIXT 
.BY JOE PIPEK 8-80 

@C1)=2;@C2)=1;@C3)=-1;@C4)=-2;@C5)=-2;@C6)=-1;@C7)=1;@C8)=2 

@C11)=1;@C12 )=2; @C13)=2;@C14)=1;@C15)=-1;@C16)=-2;@C17)=-2;@C18)=-1 

@C22)=1;@C 23) = 1;@C24)=2;@C25)=3;@C26)=3;@C27)=3;@C 28)=4;<§K29)=5;@C30)=5 

U=39;CLEAR ;FOR Y=-UTO USTEP 6;F0R X=-UTO USTEP G;BOX X,Y,1 f 1,1;NEXT X;NEXT 

BOX U,U, 1, 1,3;B0X U,-U,1,1,3;BOX -U,U,1,1,3;BOX -U,-U,1,1,3 
CY=22;CX=-68;TU=49;fi=-52;B=22;GOSUB 500;CX=S2;TU=S0;fl=68;GOSUB 400 
CY=30; CX= -64; T<J=95; CX= -57; TU=97; CY=18; CX=62; TU=9G; CY=25; CX=G2; T0=94 


D=C D=1 ) + l 

CY=0;CX=-68+CD=2 )b120;TU="T“;CX=-68+CD=1)bl20;TU=" * 
R=6bJXCD)+R;B=6bJYCD)+B;IF fl<-338=-39b(D=1)-33bCD=2) 

IF fi>33fl=39b(D=l)+33bCD=2) 

IF B<-33B=-39b(D=2)-33b(D=l) 

IF B >33B=39b C D=2 ) +33b(D=1 ) 

BOX fl,B,3,3,3; BOX fl.B.S.S.S^F TRCD) = 1 IF PXC R, B )=1G0T0 260 
GOTO 170 

GOSUB 500-C D=2)b100;IF CRBSCR )=39) + CRBS(B )=39)W=1 
IF W=1C=0;P=fl;R=B;K=3;Q=3;H=1;GOSUB 1020 
GOTO 140 


BOX R,B,3,1,1;BOX fl,B,1,3,3;GOSUB 600 
RETURN 

BOX R,B,3,3,3;GOSUB 600;RETURN 

FOR E=1T0 8;X=R+@(E)b6;IF X<-39bCD=1 )-33bCD=2)GOTO 690 

IF X>39b(D=1 )+33b(D=2)GOTO 690 

Y=B+@(E+10)b6;IF Y<-39b(D=2)-33b(D=1)GOTO 690 

IF Y >39b C D=2)+33b(D=1)GOTO 690 

IF RBSC R)=39IF RBSCB )=39G0T0 690 

IF PXC X,Y)#1IF PXC X+l,Y+l )=PXC R+l,B+l)H=30;Q=0;GOSUB 810 

2020 IF C#0IF P=RIF R=BRETURN 
2030 C=1;IF P=-39K=-1;GOTO 2070 
2040 IF P=39Q=1;GOTO 2070 
2050 IF R=-39K=-1;GOTO 2070 
2060 IF R=39Q=1;GOTO 2070 
2065 GOTO 1020 

H=z|lF C RBSC R)=39)+C flBSCP7<39) = 1G0T0 


BOX R+P,B+R,1,1,3;IF Q=1IF S=HRETURN 
IF Q=1NEXT S 

IF PXCR+P,B+R)=0Q=1;H=S;GOTO 810 
NEXT S;RETURN 
IF K+Q=0GOTO 1100 

FOR S=HTO H+7;M=S-8bC S>8);L=P+@C M );0=R+@C M+10) 


NEXT E;RETURN 

FOR S=22T0 H;IF X-R=12P=S-20 
IF X-fi=-12P=20-S 
IF X-R=6P=@CS) 

IF X-R=-6P=-@CS) 

IF Y-B=12R=S-20 ' _ 

IF Y-B=-12R=20-S 2070 P=R;R=B;C=0; 

IF Y-B=GR=@CS) 2080 GOTO 1020 

IF Y-B=-6R=-@CS) 


BOX L,O,1,1,3;BOX L.0,1,1,3 

IF PXC L,0)=1P=P+@C M)b6;R=R+@CM+10)b6;H=M-3bC M>3)+5bC M<4);GOTO 2000 
IF C=0IF S>7RETURN 
NEXT S;RETURN 

CX=CD=2)b48-CD=l)b79;PRINT “WINNER 
IF TRC1)GOTO 10 
GOTO 1990 
IF C=0Z=M+1 

IF Z>9RETURN _ 

- (oo 
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VIPER (Video Image Processing Equipment Rack) SYSTEM 


The System One contains one 1SK RAM card, one bus interface card, one 
VIPER One cabinet (aluminum), one card rack, one +/- S volt and +12 volt 
power supply (fused), one VIPER to Bally 50-pin bus cable, one switched flC 
outlet, one on/off indicator switch. 

The System Five contains 1GK RAM card, VIPER system interface card, 
heavy duty +/- 5 uolt and +12 uolt system power supply (fuse protected), 
one VIPER Fiue cabinet, one VIPER to Bally 50-pin bus cable, one fiue-slot 
motherboard with gold plated connectors, three status indicator tri-color 
LEDs, one VIPER keyboard input, one 5-slot card rack with guides and fan 
mount (fan optional ), one switched AC outlet, one on/off indicator switch. 

System Ten contains the System Fiue plus one VIPER Ten cabinet, one 
extra fiue-slot motherboard with gold plated connectors, one extra 
fiue-slot card rack with guides and fan mount (fan optional ), one extended 
44-pin VIPER to VIPER bus cable, one on/off indicator LED. 

The VIPER System keyboard is a 62-key unit that is ASCII-coded, upper 
and lower case letters, two user-defined keys, parallel to serial VIPER 
interface card (this interface card is adaptable to other keyboards), one 
aluminum cabinet, one coiled cable with DIN connector, one status indicator 
LED. 

VIPER Interface card details: This card contains the following: eight 
I/O ports to control system operations, a IK ROM monitor that is socketed 
to allow easy upgrading to a 4K ROM, a 12-2400 baud audio cassette 
interface with programmable speed selection, one keyboard input port for 
the VIPER keyboard, one memory management system to allow up to 128K bytes 
of RAM expansion, one independent 5-watt audio amplifier with uolume 
control with 8 ohm speaker output and two pre-amp outputs, one audio 
dubbing-recording mode for mixing program tapes with uoice, music, and 
sound effects, audio sampling/ and detecting in two frequency ranges for 
elaborate audio/visual synchronization. Also includes address, data, and 
control I ine buffers and bus inputs from computer expansion port. 

VIPER RAM card details: This card is a 16K addressable RAM board in 
4, 8, or 16K blocks. It is designed with the Interface card for extended 
memory addressing up to 128K bytes (use up to 8 RAM boards), multifunction 
8-position switch pack for enabl ing and disabl ing Bal ly memory areas, and 
on-board clock select. 

All printed circuit boards are of the highest quality, with 
pIated-thru hole integrity throughout. All boards are fully socketed witH- 
gold plated sockets, and all connectors and fingers are gold plated. 

Prices - alte-units are assembled and tested. Thslwsrsic RAM board and 
System One will be available 1 May 

System One 200. 

16K board 135. 

The remainder of the units will be available 31 Mau 
280. 

395. HJ i "i*W 
150. 

145. 

45. 


System Five ( w/o RAM) 
System Five (+ 1GK) 
System Ten addition 
Keyboard addition 
Parallel to Serial board 


£3 








ADS 


For Sale: Blue Ram with documentation and software $125; Cartridges: 

Clowns/BasebaIl/FootbalI at $15 each; SeawoIf and Maze at $12 ea. fill in 
perfect shape. Robert Jaeger, 58 Millay Rd., Morganville, NJ, 07751. 

Super Software now offers aiI Uideocades and Arcade units at low discount 
prices. fill 29.95 Uideocades are 25. fill fircades (including the new BfiSIC 
cartridge) are 2S0. We also offer a full line of programs for the Bally 
Arcade. For information, write Super Software, 44 Forestbrook Dr. North 
Plainfield, NJ 070G0 

SALVAGERS Trade good U-17 (Custom Address) for good U-18 (Custom Data). 

Also need one-chip ROM (reasonable) Richard Dermody, 8431 Timber Glen, San 
Antonio, TX 78250 

FOR SALE Bally Professional Computer. Almost new, just used a few times. 

Two controllers. $250 or best offer. Submit ail offers Philip Lowe, 12611 
PresneI I St, Los Angeles, CA 90066 

Complete modification kit for your Arcade- $8.00; Assembled and tested 
Kludge, $10.00 (extra parts needed included with both) Add $25 for new Data 
chip- and $1 for postage and handling. Barry Ellerson 5017 River Rd., 
Schiller Park, IL,60176 
(story and schematic in next issue) 

Bally factory games and accessories - special discount to ARCADIAN 
subscribers. For free price list, write to SFP, 1064 N. Alta five., Dinuba, 

CA 93618 

The following tape ($7.95 + .50 post) is one of many available from 
WAUEMAKERS, Box 94801,. Schaumberg, IL 60193. Write for their catalog. 

PROGRAM TAPE #2 

SIDE 1 CLUE - BASED ON THE MILTON BRADLY GAME. YOU INPUT NUMBER OF PLAYERS (DETECTIVES). YOU GET A CHOICE OF 
TWO ROOMS TO GO TO OR YOU CAN TAKE A CHANCE AND GET IN A ROOM NOT SHOWN. YOU CHOOSE THE WEAPON FROM THE 
ON-SCREEN LIST. THE COMPUTER TELLS YOU ONE OF THE FOLLOWING, WRONG SUSPECT, WRONG ROOM OR WRONG WEAPON. 

YOU MUST USE DEDUCTIVE REASONING TO COME UP WITH THE RIGHT COMBINATION AND SOLVE THE CRIME. THERE ARE NO 
GRAPHICS BUT THIS ADDS UP TO HOURS OF FUN. CAN BE PLAYED BY ANY NUMBER OF PLAYERS. 

SIDE 2 FLYING ACE FOR (1) OR (2) PLAYERS THIS GAME PUTS YOU IN THE COCKPIT OF A FIGHTER PLANE CHASING AND SHOOTING 
AT THE ENEMY. YOU MUST SHOOT THE ENEMY DOWN QUICKLY TO GET THE HIGHEST SCORE. 

CHALLENGING GAME WHEN PLAYED WITH A GOOD OPPONENT. 
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May 8, 1981 * * •* « 

*100 fiRCSDIflN PROGRAMMING CONTEST As announced in the I apt i s , ue M 

r ~ l L: s::: 

bLing r ^iEr.i?r o l!ii^r"'“ 0j ^ 9 “" ^■ t b“^n”„r^ 

Moaap, HI RathmpH, and Dick Strauss. One°d? thU.r.Hl’ dnap“ou?°aach G Ion?h 
as a winner takep hip place, and then th. monthly winner will replace t^e 

rotat ing” ‘and the'winner ^wi M ^bl ou^f Tr^o^'J^ZS'" b * 

day .tart, the next cycle of program inpot for the subseql.n? issul 

baeis Th^f “ 9r °?f “ aCh R ro 0 rQm '•■'«*!»« to th. others on a 1 - 10 

IZll' ^° reS U,lM quick, y be ^turned to me and tallied - hiahest 

*100 6 sent^with M /' nner Wil1 ** annotj nced in that issue, and a check for 
no career:! no de^s r . COPy ‘ ^ ^ **■ own, 

contest y ° U ° Pr ° 9ram that y° u wou 'd 'ike considered for the 

contest please send along a statement "I certify that the program titled 

program, signed---- --!« "* ^ ^ iS ° COpg - available 

o j• Programs that are transI ations, etc., are still needed for the 
Arcadian, but would not be eligible for the contest. ‘ 


LATEST NEWS: ASTROUISION BASIC, to be provided free with ail new Arcade 
units (box will read ARCADE PLUS), was approved and sent to be manufactured 
on April 14. Should be 8-10 weeks for delivery. The data transfer rate 
has been increased to 2000 baud. The method cf transmission has been 
changed, which is why a standard tape recorder can still be used. We will 
be able to load our old, 300 baud tapes into the new Basic. Then those 
programs can be dumped to tape via the new interface jack at 2000 baud. 

For the “Hackers" out there who want to experiment, we'll have the 
disassembled listing with comments, for %7 ppd (AstroUision BASIC 
listing), and also a description of all new commands with comparisons to 
Bally Basic (20 pages) for $2.50 ppd (AstroUision BASIC Guide). We'll be 
covering the new commands and features in tutorials in the ARCADIAN of 
course. 

Obviously, those who seriously wish to continue selling programs will 
have to provide them in both formats. This leads me to advising you that 
we will support all versions of the Ianguages used in the Arcade, and we'll 
have to make some changes in the ARCADIAN to be able to handle everything. 
At the moment, we'll be indicating which Basic a program is written in by 
the notations "BB“ for Bally Basic, "AB“ for AstroUision Basic, and "XB“ 
for Extended Basic. 


©1^8* Rcbe.t FalorTs 
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MOTHERBOARD MODIFICATIONS The Following changes are recommended if 
your machine has any of the listed symptoms. The author, Barry Ellerson, 
has sent us some "inside information", and can provide a sma I I , built-up 
addition, ready for instaI I at ion. Check his ad on p.80 

If your unit has these symptoms: Screen Tearing, Loss of Horizontal^ 
Sync. on warm-up, Unit goes Dead - or keeps Resetting after warm-up, then 
the following modifications will correct them. If your unit went 
completely dead following these symptoms, these modifications will probably 
repair it. 

NECESSARY MODIFICATIONS 
1. Replace 74LS74 (U-16/ Cl ock ) with 74S74 

NOTE: B: Pl :u“. Dr :r r h L 5 ? 1<U ' 3Z - 8 : P ‘"- Cl °‘ !k> »*«■ board assembly, 

sided foils as ther^ * *° °° U “ ‘°““ r to fl °“ ° p ° p " d double 

"-t"«-: r.*rK£; t rr 

r e r „ t h :-s t or^- 

back over top of Kludqe board CflUTTONi + y y at 

75361 driuer If . .. . TI0N - Use extreme care when removing 

on Jo«o»! S °' der K ' Ud9,i Cot off excess mir. 

copoci torsos r '( These “"V“P ” 1 ‘ l ° r <*«• d -9ro-»), end place jumper mher. 
Been d^e b^he fact„“yT "“ B n0t 9 °‘"' b °‘"' d - «- *»‘* — h«. 

Ji orTo P rgIr° hm r " 1St ° r ^ ‘ lfc SPppl ^ 1 “> ««> - « -..star, 174 

style ”„i“ Sr °“ C °'°7 d data Chlp <und8r ' th " k-BP-HJ. this eld 
andYor memory should be ^,h!° Ck ' DM81LS9S - 

properlg beat sunb, after cutt^Tho^h C0l0r) 

6. Replace 82 ohm resistors ih clack (R-12,13) mith 47 ohm resistors. 

° THER modifications USEFUL BUT NOT ABSOLUTELY NECESSARY 
2 * “' r ‘/ roK cathoda "f CR-3 to ■ + • end of C-S. 

o' r’u , , CI/0) ls 9 lass > orange and black, replace. 

4 !f C H^e°j!ltf 9 “ t ° f ke ? T d ° nd fl ' e ° ff anu P'-" t TP d ‘"9 leads, 
s. rut hot melt wax on base of key pad. 

6. Replace CR-3 to -6 with schottky 1N5817 or equivalent. 

The wiring schematic for the Kludge board follows. \ 

lC«7*4l<* Ri'KL-^SOjt Q»Qte|M4^0| ££■ 
























-nJ cn th * to 
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PRECAUTIONS 

1•Do not wear nylon clothes. Work in a static-free environment, 
preferably grounded. 

2.If the unit is operated outside of its case, short across C-G before 
further handling. Inadvertent shorting to other points on board could blow 
components. 

3.Check to be sure metal bushings in bottom shield pan do not short 
, across any foils. 

4.Check on-off switch for center lead that extends beyond board edqe 
as it could short to the shield pan. 

5.Check 5v. heat sink for good mechanical contact and check clearance 
of spring clips and board foils. 



Y ,Rcpl<*.og C u> t"fi 


Full size pc board of Kludge: 


w 

& 


prtiu 


.STRAIGHT LINES 
.JIM DUNSON 12/78 

10 CLEAR ;T=0;NT=0;N=0;FC=BC-1; BC=RND (32)b8;S=RND (20 ) + 10;R=RND C3);C=R 
20 M=X;GOSUB 40;GOSUB 50;N=X;GOSUB 40;GOSUB 50;T=T+1;IF T=SFOR D=1T0 1000;NEXT 
D; GOTO 10 
30 GOTO 20 

40 X=RND (14 ) -7;RETURN 
50 A=Mb3; B=NbG; IF R=2 C=RND C3) 

60 LINE A,B,C;RETURN 
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ALTERNATIVE ENGINEERING regrets to announce a delay of the VIPER system. 
However we are glad to announce that the delay is due to the addition of a 
keyboard interface to the VIPER System One and an additional feature to 
the 16 K RRM board. 

The RRM board will now allow you to load the new Extended Basic 8K tape 
into the RRM and use the other 8K in which to run programs. Once loaded, 
you can run either Extended Basic or Bally Basic because they are 
compatible. You can even load Bally Basic programs while running your 
Extended Basic and when you execute the old program it will run 4-6 times 
faster. 


The System One Interface Card will now include the same VIPER keyboard 
input port as the System Five. The two systems will be software and 
hardware compatible. We wish to thank everyone for their continued 
interest in the VIPER System. Rdding these features at this late stage was 
a hard decision to make but because we want to give you the Extended Basic 
on tape and a port for a keyboard we think that this delay will be worth 
it. The revised price of the System One will be *225. only *25 more than 
it was without the keyboard port, automemory write-protect circuit, or the 
Extended Basic tape. 


filternative Engineering, P.O.Box 128, Gardiner, ME 04345 
(207) 622-5205 (207) 582 6327 


itonal Notes Rfter a number of inquiries came in as a result of last 
month s ad, the Rlternative Engineering designers decided that there was 
enough demand for a keyboard interface at the System One level. In 
addit^n, they had to ensure that if the Extended Basic was loaded into 
half of the available memory, that there was no chance of it's being lost 
while a program was being set up or run in the other half. The System One 
card requires two additional chips to do this, and the rework to the 
printed circuit board is causing a delay of 4 to 6 weeks. The prototype has 
een operating, and Bally Basic programs have been loaded into Extended 
Basic and since screen memory is no longer utilized, the programs operate 
much faster. The Introductory Prices, stated on page 61, are still in 
effect except for System One, which is now *225 (and includes the Extended 


SUB HUNT - YOU COMMAND THE DESTROYER IN AN ATTEMPT TO LOCATE 
AND DESTROY THE ENEMY SUBMARINE FLEET. FIRST, YOU WILL BE ASKED 
WHAT THE WINNING SCORE SHOULD BE. ENTER THIS THROUGH THE KEYBOARD. 
THIS IS A ONE PLAYER GAME AGAINST THE COMPUTER. A COMPUTER SUB 
IS SUBMERGED SOMEWHERE ON THE GRID. ON EACH TURN HE WILL EITHER 
MOVE OR FIRE TORPEDOES. IF HE FIRES, HE MUST REVEAL HIS LOCATION. 
YOU USE THE JOYSTICK TO CONTROL YOUR MOVEMENT, UP, DOWN, RIGHT, 
LEFT, OR DIAGONAL. AFTER YOU TWEEK THE TOP, A LOUD BEEP IS HEARD. 
NOW COUNT "ONE SUBMARINE, TWO SUBMARINES, ETC" UNTIL A SOFTER 
BEEP IS HEARD. THIS REPRESENTS THE DISTANCE TO THE SUBMARINE. 
SONAR!! NOW YOUR CREW FIRES DEPTH CHARGES INTO THE TWO SQUARES 
IN FRONT OF YOU. MOVE AGAIN. GOOD LUCK. 
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NT=0; &( 23 )<=200; &( 20 )=0; &( 21 )=0 
8805 GOSUB 8950 
8810 T=l;GOSUB 9500 
8820 GOSUB 8200;C=1;D=3 
8830 GOSUB 8000 
88-40 X=H+I 
8890 RETURN 
8900 CX=10bX-40 
8910 CY=10bY-30 
8920 RETURN 

8950 &(21)=255;GOSUB 8900 
8960 PRINT **“,;&(21)=0 
8990 RETURN 

9000 NT=0;PRINT ;PRINT ;PRINT "SUB HUNTER*;PRINT 


5 . SUB HUNTER 

6 . BY BOB WISEMRN 
10 CLEAR ;GOSUB 9000 
20 GOSUB 1000;GOSUB 2000 
30 GOTO 20 

1000 U=C;U=D 

1010 L=JX(1);M=JY(1);N=TR(1) 

1020 IF L=0IF M=0IF N=0GOTO 1010 
1040 NT=30 

1045 H=ABS(D-F)+ABS(C-E) 

1050 MU="Q";FOR I=1T0 500bH;NEXT 
1060 NT=4;MU=“ Q";NT=0 
1070 FOR I=1T0 400;NEXT I 

1100 IF (C+L<1)+(C+L>7)+(D+M<1)+(D+M>5)GOTO 
1110 C=C+L;D=D+M 
1120 X=C;Y=D;GOSUB 8300 
1130 X=X+L;Y=Y+M 

1140 IF (X<1 )+(X>7) + (Y<l)+(Y>5)GOTO 1200 
1150 GOSUB 8300 
1200 X=U;Y=U;GOSUB 8200 
1210 GOSUB 8000;GOTO 1990 
1800 NT=10;MU="*" ; MU=" "; NT=0; GOTO 1010 
1990 RETURN 

2000 IF RND (10)>7G0T0 2500 
2010 L=RND (3)-2;M=RND (3)-2 
2015 IF L=0IF M=0GOTO 2010 
2020 X=E+L;Y=F+M 

2030 IF ( X< 1 )+(X>7) + (Y<l)+( Y >5)GOTO 2010 9510 IF SPRINT "GOOD SHOT 
2040 E=X;F=Y;GOTO 2990 
2500 H=7;1=1 
2510 IF C<E H=1;I=-1 
2520 Y=F 

2530 FOR X=ETO HSTEP I 
2540 GOSUB 8700;NEXT X 
2990 NT=100;MU=99;NT=0 
3000 RETURN 
8000 CX=10bC-40 
8010 CY=10bD-30 
8015 PRINT “a",;RETURN 
8200 GOSUB 8900;PRINT “ *,;RET 
8300 GOSUB 8950 
8340 IF X=EIF Y=FGOTO 8400 
8350 GOTO 8690 
8400 S=l;GOSUB 9500 
8410 E=RND (7);F=RND (5) 

8690 GOSUB 8200;RETURN 
8700 GOSUB 8900 
8705 &(23 )=50 

8710 &C21)=50;&(20)=255;NT=1 
8720 IF X=CIF Y=DGOTO 8800 

8730 PRINT 21)=0 

8731 NT=0 

8735 &( 23)=200;&(20)=0 
8740 GOSUB 8200;GOTO 8890 


9005 &(23)=200 

9010 INPUT "ENTER # OF GRMES“G 

9020 CLEAR ;FC=134;BC=169 

9025 R=0;B=0;S=0;T=0 

9030 FOR X=-25T0 25STEP 10 

9040 BOX 0,X,71,1,1;NEXT X 

9050 FOR X=-35T0 35STEP 10 

9060 BOX X,0,1,51,1;NEXT X 

9070 C=1;D=3;E=7;F=3 

9080 GOSUB 8000 

9100 RETURN 

9500 CX=-75;CY=-40 


9520 IF TPRINT "YOU ARE SUNK* 

9530 CX=-75;CY=40 
9540 R=fl+S;B=B+T;S=0;T=0 
9550 PRINT “SHIP=“,#2,R " SUB=“ 

9552 CX=-75;CY=-40 
9554 FOR N=1T0 1000;NEXT N 
9556 PRINT “ 

9560 IF A<GIF B<GRETURN 
9600 CX=-75;CY=-40 

9610 IF R=GPRINT "GOOD JOB CAPTAIN", 
9620 IF B=GPRINT “YOU ARE DESTROYED" 
9630 STOP 




Bob Wiseman 

118 St. Andrews Dr. 

Cincinnati, OH 45245 
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• 1 :RETURN ; E=9000; F=1000; H=2000; 1=7000'; 7^5000; L=3000; 0=8000; P=4000 

10 CLERR ;BC=RND (25G );FC=BC+4;S=4;B=32767;W=B0;GOSUB 10000;CLEAR ;GOSUB F;Q=3 


0;R=0;GOSUB H;U=A 

15 CY=40;PRINT "POPULRTION= ",#1,A,”,000 
20 R=0;W=W-20;IF fl<99CY=-25;PRINT "YOU LOSE!*;GOTO I 

30 PRINT "YOU HflUE “,#1,Q," MISSILES“;PRINT “ENEMY HRS ",#l,Sb5," MISSILES";B= 
R;FOR Z=1T0 H;NEXT Z 

35 IF S=0IF U-B<100CY=-25;PRINT "YOU WIN";GOTO I 
40 IF S=0CY=-25;PRINT "YOU LOSE!";GOTO I 

v. 50 BOX 0,10,160,67,2;PRINT "****** ENEMY ATTACK ****** *;&(15)=49;&( 17)=243;&(1 
03=244;&(19 )=245;&(213=15;NT=0 

$$60 &(223=255;&(233=10;FOR Z=1T0 H;NEXT Z;BOX 0,10,160,57,2;GOSUB L;Y=W;FOR Z=1 
TO 5;BOX @( Z 3, Y,1,3,3;NEXT Z 

65 Y=Y-1;&(16 3=Y+74;FOR Z=1T0 5;IF @(Z3=0GOTO 100 Bob Weber 

70 IF PX(@(Z3,Y-13NT=0;GOSUB O 6594 Swartout Rd. 

80 IF PXC @( Z 3,Y 3=0@(Z 3=0;GOTO 100 fllgonac, MI 48001 

90 BOX @( Z 3,Y-1,1,1,1;BOX @(Z3,Y+2,1,1,2 
100 NEXT Z;IF YC-33G0SUB P;GOTO 140 

110 IF TRC13IF R=0IF Q>0Q=Q-5;R=1;GOSUB P;N=-30;FOR M=6T0 10;BOX @( M 3, N, 1,3,3; N 
EXT M 

120 IF R=1G0SUB J 
130 GOTO 65 


140 fi=0;GOSUB H;IF B-fl=0CY=0;PRINT "NO LOSSES";GOTO 160 
150 CY=0;PRINT #1,B-R,",000 KILLED 
160 S=S-1;GOTO 15 

1000 BOX 0,-42,160,3,1;FOR G=-80TO 79STEP 3;BOX G,-3B,RND (53,3+RND (63,1;FOR N= 
1T0 2 

1010 BOX G,-32-RND (93,1,RND (23,2;NEXT N;NEXT G;RETURN 

,2000 GOSUB E;BOX 0,5,160,75,2;CY=40;PRINT "COUNTING POPULATION 

’2010 FOR Y=-37T0 -34; FOR X=-80TO 79; IF PX(X,Y3R=fl+l 

^020 MU=A;NEXT X;NEXT Y;IF R>B fl=B 

.2030 NT=0; RETURN 

'3000 FOR Z=1T0 5 

3010 R=RND (1503-75;FOR C=1T0 5;IF (@(C3=A3+(R=03G0T0 3010 
3020 NEXT C;@(Z3=R;NEXT Z;RETURN 
4000 FOR Z=6T0 10 

4010 A=RNB (1503-75;FOR C=6T0 10;IF @(C3=AG0T0 4010 
4020 NEXT C; @( Z 3=A;NEXT Z;RETURN 

5000 N=N+1;FOR M=6T0 10;IF PX(@(M3,N3=0GOTO 5030 

5005 IF JX(13B0X @(M 3,N-1,1,3,3; @( M 3=@(M 3+JX(13;BOX @(M 3,N-l,1,3,3 
5010 BOX @(M 3,N+l,1,1,1;BOX @( M 3,N-2,1,1,2 

5020 IF N>=Y&(213=255;&(16 3 = 1;BOX @( M 3, N, 9,9,1; BOX @( M3,N,9,9,2;FOR D=1T0 500;NE 

XT D;&(16 3=Y+74 

5030 IF N>Y+1R=0 

5040 NEXT M;&(213=15;RETURN 

7000 CY=40;PRINT "ORIGINAL POP. = ",#1,0,",000 

7010 PRINT "TOTAL LOSS = ",#1,U-A,",000";PRINT "PRESS ANY KEY TO PLAY AGA 

IN";IF KPRUN 

8000 &(213=255;&(16 3=0;FOR D=1T0 7 

8010 BOX @(Z3,Y,D,D,1;NEXT D;BOX @(Z3,Y,9,9,2;FOR D=1T0 F;NEXT D 
8015 IF Y>-37&(223=15;RETURN 

9000 &( 213=0; &( 22 3=0; &( 23 3=0i NT=JL;RETURN . 

10000 PRINT " STRATEGIC AIR COMMAND";PRINT ;PRINT "IF LOSS OF LIUES FROM”;PRINT 
"ATTACK EXCEEDS 100,000, 

1-0010 PRINT “YOU LOSE! TO DEFEND GOTO TR( 13&( KN( 13 ’; FOR Z=1T0 L; NEXT Z;NT=1;RET 

URN .HflV 
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.CIRCLES 

.BY RON PICRRDI 

CLERR 

;PRINT ;PRINT 

ALL CIRCLES' 



90 

100 

105 

110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 

250 

260 

270 

280 

290 

300 

310 

320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

440 

450 

460 

470 

480 

490 

500 

510 

520 


PRINT 
PRINT 
PRINT 
PRINT 
GOSUB 1000 
FC=BC 
BC=15 

FOR A=1T0 150 
X=X+1 

GOSUB 1100 
NEXT R 
GOSUB 1000 
FOR R=1T0 75 
X=X+2 

GOSUB 1100 
NEXT R 
GOSUB 1000 
FOR A=1T0 50 
X=X+3 

GOSUB 1100 
NEXT R 
GOSUB 1000 
FOR R=1T0 25 
X=X+6 

GOSUB 1100 
NEXT A 

FOR R=1T0 500 
NEXT fl 
GOSUB 1200 
FOR R=1T0 80 
Y=Y+1 

GOSUB 1300 
NEXT R 
GOSUB 1200 
FOR A=1T0 40 
Y=Y+2 

GOSUB 1300 
NEXT R 
GOSUB 1200 
FOR A=1T0 20 
Y=Y+3 

GOSUB 1300 
NEXT R 
GOSUB 1000 
Y=3;C=2 
GOSUB 1400 
GOSUB 1500 
Y=6;C=3 
GOSUB 1400 
GOSUB 1500 
Y=10;C=4 
GOSUB 1400 


POP 


ART" 

530 GOSUB 1500 
540 Y=15;C=5 
550 GOSUB 1400 
560 GOSUB 1500 
570 Y=21;C=6 
580 GOSUB 1400 
590 GOSUB 1500 
600 Y=28;C=7 
610 GOSUB 1400 
620 GOSUB 1500 
630 Y=36;C=8 
640 GOSUB 1400 
650 GOSUB 1500 

655 Y=36;C=8 

656 X=0;B=0 


1100 &C17)=Y;&(18)=-Y 
1110 IF Y>0C=C-1 
1120 IF Y<0C=C+1 
1130 Y=Y+C 

1140 LINE X,Y,0;LINE -X,-Y 1 
1150 RETURN 

1200 FOR A=1T0 500 

1201 NEXT R 

1202 CLEAR 

1203 &(22)=25S 

X 1210 X=0;Y=-40;C=10 

1220 FC=RND (32 lb8-2;BC=RND 

1225 LINE X, Y, 0 

1230 RETURN 

1300 &(171=X;&(18)=-X 

1310 IF X >0C=C-1 

1320 IF X<0C=C+1 

1330 X=X+C 

1340 LINE X,Y,0;LINE -X,-Y 1 
1350 RETURN 
1400 X=0;B=0 
1405 LINE X,Y, l 


660 FOR fl=TTO 40 1410 FOR R=1T0 40 
670 LINE 0,0,0 1420 IF X>0C=C-1 


1430 IF X<0C=C+1 

1440 IF Y>0B=B-1 

1450 IF Y< 0B=B+1 

1460 X=X+C;Y=Y+B 

1470 &(17l=Xb2;&(18)=Yb2 

1480 LINE X, Y,1 

1490 NEXT R 


680 IF X>0C=C-1 
690 IF X<0C=C+1 
|P00 IF Y >0B=B-1 
705 X=X+C 
710 IF Y<0B=B+1 
715 Y=Y+B 
'720 LINE X,Y,1 
730 &(171=Xb3;&(181=Yb3 
740 NEXT R 
750 GOSUB 1500 
760 CLEAR ;&(22)=255 
770 X=0;Y=32;B=0;C=10 
780 FOR R=1T0 370 
790 IF X>0C=C-1 
800 IF X<0C=C+1 
810 IF Y>0B=B-1 
820 IF Y< 0B=B+1 
830 X=X+C;Y=Y+B 
840 BOX X,Y,2,2,1 
850 &(171=Xb3;&(18l=Yb3 
860 NEXT fl 
870 GOTO 2000 

1000 FOR A=1T0 500 

1001 NEXT R 

1002 CLEAR 

1003 &(221=255 
1010 X=-75;C=8;Y=0 
1015 &<221=255 
1020 LINE -75,0,0 

1025 FC=RND (32lb8-2;BC=RND (321b8+2 
1030.RETURN 


Ron Picardi 
630 Bacon R 
Saginaw, MI 


1495 RETURN 
1500 FOR R=1T0 500 
1510 NEXT fl 

1520 FC=RND (32 )b8-2;BC=RNE 
1530 RETURN 

2000 PRINT “ POP ART" 
2002 NT=3 


(321b8+2 


48603 


(32 lb8+2 
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MEMORY MRP - flstroUision Basic: fls of the date of printing, the various 
allocations of memory space in the available 4K are as indicated below. We 
printed a similar map for the original Bally Basic in Uo I 1, p.34, and 
areas obviously different are indicated by an asterisk (*). 


On Board ROM Area 
BASIC ROM Area 


0 - 8191 

8192 - 12287 


0 - 1FFF 
2000 - 2FFF 


Screen Memory Area 

Graphics/Program Area 
Scratchpad Area 


16384 - 20479 
16384 - 19983 
20000 - 20463 


4000 - 4FFF 
4000 - 4E10 
4E20 - 4FEF 


♦Uariables start at 


20002 


4E22 


♦Stack Area 
♦Line Input Buffer 
Text Array Area 


20258 - 20415 4F22 - 4FBF 

20154 - 20257 4EBA - 4F21 

-24576 to -22777 A000 - A70C 


MACHINE CODE MYSTERY We've had very few machine code programs for you, 
and I believe part of the problem has been the awkward entry of values. 
The following program by Al Rathmell makes the machine do all the work of 
swapping pairs of hex code, converting them to decimal, and PGKEing them 
into memory slots. 


1. HEX POKER 

2. BY AL RATHMELL 

10 CLEAR; INPUT "START ADDRESS = “ B 
20 PRINT #2, B, " = “, 

30 FOR A = 1 TO 2; K = KP; TU = K; IF K = 
40 GOSUB 90 

50 IF A = 1 J = K x 16 
60 IF A = 2 K=J+K 
70 NEXT A; %(B) = K; B = B + 1 
80 PRINT #6, K; GOTO 20 
90 IF (K < 48) + <K > 70) GOTO 20 
100 IF K > 57 IF K < 65 GOTO 20 
110 K = K - 48; IF K > 9 K = K - 7 
120 RETURN 


112 TU = 13; STOP 

This program was typed 
directly, and therefore 
the smal I ' x' means to 
"multiply*. 


The HEX POKER program is a small utility routine that will store 
hexadecimal Z80 Opcodes into memory one byte at a time. The starting 
address is entered in decimal (such as using 20180, the BaIly Basic Iine 
buffer starting location - note that it is 20154 in the AstroUision Basic - 
rf ). This is identified as variable “B“. As each memory location is 

listed on the screen by this program, enter a two-digit hex code from the 
keypad. After the last byte, key in WORDS RETURN. To run the machine code 
routine, enter CALL B where “B" was the starting address. . . 

AI Rathmell, 1643 Swallow Dr., Sunnyvale, CA 94087 
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EXTENDED BRSIC We expect to make this new Ianguage available in two 
versions: on tape, for those of you who wiI I have a lot of added memory! 

and on a ROM for those of you with a small added memory. To explain: The 

Extended Basic resides in 8K bytes. If you have lots of memory available to 
you, then you can afford to allocate 8K of that memory exclusively for the 
storage of the Basic, and use the rest of your memory for inventing a 
program that utilizes that Basic. If you had 24K of memory, for example, 
8K would be language, and 16K could be program. You would have to load the 
Basic every time you wanted to use it. It is the cheaper way to obtain the 
Basic. 

If you have a Iimited amount of memory, then you want to keep as much 
of it available for writing programs. That person can purchase the Basic 
permanently located in a ROM chip, exactly as the Bally Basic is now. It 
would be inside a cartridge and would fit into the existing receptacle just, 
I ike the Bally Basic does. The Ianguage will be the same and programs 

will run equally well in either memory system (as long as the program 

fits ). 

Here is a list of most of the new commands and features that will 
appear in the Extended Basic: 

POINT and CIRCLE 

SNRP memorizes what is on the screen and stores it in an array. Later 
you can recall the scene using SHOW 

NEW erases the program 

DEFAULT sets all variables to their original values. 

ZERO sets all variables to zero. 

DATA allows easier entry of variables 

SCROLL rolls the text up or down a specified number of lines 

Commands can be shortened (P. means PRINT) 

Conversion is available between decimal and hex and binary 

Four colors anywhere 

Additional character font size of 3x5 

A window can be set up of any size, anywhere, within which text can be 
placed and scrolled. 


UNUSUAL SOUNDS The following program was sent by Bill Loos, which, along 
with the list of variables, will provide some unusual sound effects. Make 
direct substitutions of the values of X and Y as recommended, either 
individually, or by grouping two or more together. 



-255 Y = -224 

X = -223 Y = -192 

X 191 Y = -1B0 

X = -159 Y = -128 
X = -127 Y = -96 

X = -95 Y = -64 

X = -63 Y = -32 

X = -31 Y = -1 


Bill Loos, 8593 Framewood Dr. Newburgh, IN 
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10 INPUT X; INPUT Y; &(21)=15 X = 

20 FOR A=X TO Y 

30 &( 19 ) = A; &( 18 ) = A 

40 &C20) = ABS(2xA); NEXT A 

50 FOR B = 0 TO 500; NEXT B 

60 &( 18) = 0; &( 19) = 0; &( 20) = 0 

70 GOTO 10 
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ADS: 


PROGRAM TAPE #3 

s “ 1 SS “S iTSftSFSi’KS S,”™’. »ZE without touching a wall, if 
“ tS a w!l™?ou loose points plus blow a hole in it which your opponent can use to his advantage. 

OBSTACLE COURSE IS PROBABLY OUR MOST POPULAR GAME SO FAR. IT REQUIRES A GREAT DEAL OF PRACTICE TO DEVELOP 
THE^SKILL TO GUIDE A BALL THROUGH A COURSE. AFTER YOU COMPLETE THE COURSE THE FIRST TIME THE NEXT TIME 
GETS TOUGHER. THERE ARE SEVEN LEVELS PER GAME SET AND SEVEN GAMES PER SET. STARTING AT THE LEVEL ONE AND 
INCREASING EACH GAME. SO FAR NOBODY HAS MADE IT THROUGH ALL SEVEN LEVELS. BUT IF YOU DO, YOU CAN TRY THE 
INTERMEDIATE LEVELS'OF PRO LEVELS. BEST OF LUCK YOU'LL NEED IT. 


’ YEARS TO YOUR DESTINATION. YOu’mAY BE ATTACKED BY ENEMY SHIPS, RUN OUT OF FUEL,COLLIDE WITH METEORS, 1 
YOTO^AT THE CONTROLS. WARP 1, WARP 2, WAIT FOR HELP.FIRE PHAZER OR EVASIVE ACTIONS, ITS A LONG WAY TO GO 
BUT A GOOD CAPTAIN CAN MAKE IT WITH A LITTLE HELP FROM FRIENDLY ALIEN. 


TAPES FOR SALE by WAUEMAKERS 

P.O. Box 94801 
Schaumberg, IL, 60193 

. 4L 

Price $7.95 plus .50 postage 




Tape 3. 


Assembled and tested 


Complete modification kit for your Arcade - SS.E 
Kludge, *10. (extra parts needed included with both) Add *25 for new Data 
Chip - add *1 for postage and handling. Barry El Ierson 5017 River Rd., 
Schiller Park, IL 60176 
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ARCADIAN 

Robert Fabris, on schedule 
3626 Morrie Dr. 

San Jose, CA 95127 


FIRST CLASS 

U $ postag* 

PAID 

Sunnyv»U, CA 
Ptrmit No 931 
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Volume 3 Number 8 



June 8, 1981 


EXTENDED BRSIG LANGUAGE has been mentioned in these pages for quite 
a while now, and we are finally able to state that it is available! Jay 
Fenton, developer of the Bally Basic and the new AsthoUision Basic, called 
me about two years ago, asking if there was any interest in a new" language 
he was then working on. I told him it would have to be able to address 
more memory space than the 1800 bytes of Bally Basic, and he went back to 
the drawing board. Subsequently, as he developed the language, and Perkins 
.Engineering developed the Blue Ram memory addition, and Alternative 
Engineering developed the Viper System memory addition, we were 
instrumental in having these gentlemen talk to each other to ensure that 
compatibility would not be precluded. The first tapes of the new Ianguage 
have been received by Alternative Engineering, and they will be supplied 
free with the smallest expansion they provide, the System 1. See their ad 
on p. 89. The Ianguage will also be provided in a RON form for direct 
plug-in into the Arcade, by Perkins Engineering. The engineering work to 
accommodate this form of presentation is now underway. I have received a 
sample of the SYSTEM 1, and the Extended Basic language. The Ianguage is a 
great step towards ZGrass in that it has the graphics features of POINT, 
CIRCLE, SNAP, SHOW, and WINDOW, two sizes of lettering, plus the 
capability to have four colors anywhere on the screen. 


sma I I 
persona 


BASIC MANIPULATION 


0ne the things that we plan to do is create 
modifications to the Extended Basic language, to provide optional or 
. u , "J ^ eatures - These options could take the form of short programs 
to be loaded after the Basic was loaded, and it would modify the language 
itself. We currently modify programs to do things we want, this opens up 
ar!thi a ? 9U - 9e changes. Conceivably,, one could develop a "floating point 
oranh h P° cka 9 e modification, or scientific math appIications, or new 
graphic characters for a game or other application. 

ULLRY5 are a familiar story to all-time subscribers. The new 
AstoVision Basic cartridge was pul led from production in order to make some 
corrections. George Moses and Tom Wood each found a "glitch” that could 
cause the program to reset under special circumstances. Even though those 
circumstances would rarely occur,- the AstroVision people decided to make 
the corrections needed, take the delay in production, but end up with a 
better product. As it is, about a month was lost. Those of you who have 
ordered the “AstroVision Basic Listing' will find an error note on page 23 
of the listing, covering this. 

WHAT TO PRINT or sometimes what not to print, is perplexing. We 
cannot restate alI the basics in each issue, even in each volume. Yet new 
and unsophisticated readers join us each month, and wonder what we are 
talking about. My original intent is setting up the Volume structure was to 
gradually carry us all from the rudiments on towards the sublime. In other 
words, to get the fulI story, one has to have alI the material from Day One 
since we can't reinvent the wheel too frequently. The basic tutorial 
material is available in Volumes 1 and 2, as welI as numerous good 
programs, and each Uolume is available at *10. 

GRAPHICS and how to produce them is always of interest, and we have an 
article by Rich Tietjens in this issue, explaining character generation. 
CoincidentaI Iy, the June issue of Creative Computing has a large article 
discussing how the TU makes graphics, with the use of the Atari computer. 
The generalities are the same for all computers, so that this would be an 
excellent adjunct to Rich's article. 

©1^81, Robert Farris_ O 1 ___ 
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PRE-TUTORIAL 

The pixel is the smaI lest object that can be shown on the screen. 
Its actual size is determined by two things, the physical size of the TO 
screen itself, and the "resolution* that the computer is capable of. The 
Arcade will divide every screen into 16320 pixels, disposed at 102 high by 
160 wide. Obviously, the pixel is therefore bigger on a bigger screen. 
These 16320 pixels form the "low resolution mode", and by adding more 
memory (plus a few other items), the resolution can be increased to twice 
as many (medium resolution) or twice again to 49280 pixels (high 
resolution). The Perkins mod described on page 63 can provide any of these 
resolutions. Well, with four times as many pixels on the same screen, 
each one has to be one-fourth the size of the original, so detail of 
objects, characters, etc., is greatly enhanced. 

Each pixel is turned "on* or "off" by the TO's electron gun each time 
it makes a sweep of the screen, so you have to have enough memory on board 
to remember the status of each pixel. The screen is therefore “refreshed" 
at every sweepA 

The computer stores such common things as characters, letters, etc., 
in little subroutines and "calls" each one as requested by the program’ 
without having to generate the character every time. The program in Rich's 
tutorial below indicates a simplified way for you to generate your own 
character (for a game, etc.,) and control its location by setting up a 
subroutine that your big program would call as needed. To do this, he sets 
up a 16 pixel by 10 pixel workspace, and determines which of he pixels in 
that space has to be "on" to generate the character. This is done outside 
are entered into the prosram for 

There,are eight "bits" in a "byte". The computer uses bytes in most 
°,L r computations, and each one has a number assigned to it, from 0 to 
Z56. This value is calculated by q unique system, as shown: 
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Each bit can be either a "1" or a "0". For each "1“ that is shown, one 
adds together all the correspond ing "bit values". This sum is the “byte 
value". Every number from 0 to 256 can be developed this way, and there is 

only one combination to do it. As as example, for a byte value of 84, bits 

number 6, 4, and 2 must be set equal to "1", for their bit values are 64, 

16, and 4 respectively, their sum is 84. Mathematicians will see that the 
bit values represent the powers of two raised to the bit position. 

Now to pixels. Each bit is equivalent to a pijxel insofar as the 

screen picture is concerned. At every "1", the screen will be "on", so we 
can^ easily generate a picture by selecting the bits that we want to be 
on , determining the byte value, and telling the computer that information 
- as Rich does in the following: 
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Creating Special Graphics, by Rich Tietjens 


Most of us who program in Bally BASIC have often wished for a faster 
means of creating complex characters on the screen. The most obvious 
method uses a machine-Ianguage subroutine, but many hackers have no desire 
to "get involved" in the complexities of this mysterious and arcane art. 
However, if you are wil I ing to do some doodl ing on paper and a I ittle basic 
arithmetic, you can create your own special characters without headaches. 

First, you must write (or modify) your program to employ the 
subroutine. This requires at least two variables to position the 
character; I chose H (for Horizontal and U (for Uertical ). 

Now, wherever you want to draw your character, you must set the H and 
U values; the position 0,0 is in the upper left corner of your screen. 
Position H,U will define the upper left corner of a character block 16 
pixels wide by 10 pixels high. H may range from 0 to 159; U from 0 to 99 
(which is off the bottom of the screen). Then POKE 20203,Ux256+H (( that 
is, program the statement to read - - X(20203)=Ux256+H )) 

Now, CALL 20200 UoiI a! There is your character I But wait, we can't RUN 
your program without the subroutine in place; so make your changes; then go 
ahead with the rest of this story. 


The following ifoutine will draui^ move, and limit to the screen area a 
special character. 


When your main BASIC program is modified to your satisfact ion, save it 
to tape; verify a good recording and set it aside. 

Now let's define your characters; each is drawn on a 16x10 matrix, 

thusly: 
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Note that this positions the 
figure to the left of the avail - 
able 16 pixel block. As a 
drill, see if you can determine 
the entries that will place the 
figure at the right side within 
the bIock. 


RICH TIETJENS 

501 S. ARCHER *5 

SAN ANGELO, TEXAS 76903 


10 . POSITION AND DRAW 

20 X(20203) - 256 b U + H; CALL 20200 

30 .* GET NEW POSITION 

40 X = H + JX(1); Y = 0 - JY( 1 ) 

50 . WRAPAROUND 
60 IF X > 159 X = 0 
70 IF X < 0 X - 159 
80 IF Y > 99 Y = 0 
90 IF Y < 0 Y = 99 
100 . ERASE 
110 CALL 20200 

120 . CHANGE POSITION AND GO DO IT AGAIN 
130 0 = Y; H = X; GOTO 20 
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In this example, representing an Apollo Lunar Module, the X's show the 
ixels which will be turned on when the subroutine is called. Since no 
ixels are turned on in row 0, both bytes equal zero. In row 1, bits 3, 2, 
nd 1 of the left byte are turned on, equalling 8 plus 4 plus 2, or 14; the 


right byte is still zero. 

When you have all the 
enter the values computed 


lues figured out, load PROGRAM A; RUN it and 
n the byte value table. If you have two 
cept zero when asked 'two figures?'; enter 0 


characters, enter any number except zero when asked 'two figures?'; enter 0 
if you only have one graphic character. 

Now, the program will ask “READY?". Press any key (except HALT) to 
have your character displayed (both will display if you have two.) 

If it (they) is/are ok, put the main program tape back in the 
recorder, with the tape positioned just past the trailing end of the 
BASIC listing. Start the recorder and press 'GO'. PROGRAM A will assemble 
your subroutine and put it on tape. When it is done, you can RESET the 
memory, load the tape just created, and there is your pet graphic 
character! If you wish to switch to the second graphic character, just 

POKE 20213.129 (that is, X(20213)=1Z9 ). POKE 20213, 128 to switch back. 

If : nStr ri°ns are inc * uded on the tape, using the REM (. ) statement 
the machine Ianguage subroutine should be recorded after the instructions; 
otherwise the remarks will override the subroutine. And that's all 

there is to creating and using your own graphic characters! 

(Note for Blue Ram owners: you can do the same thing, but have a lot 
channoH°°oi wi th^" th^CALL addres ses within PROGRAM A must be 


ROM subrout in 


Special thanks to Tom Wood for the effort exp 


-001 . GRAPHIC CHARACTER MAKER 
1002 . BY RICH TIETJENS 
1010 GOTO 1030 

1020 5£(Y) = U; Y = Y + W; RETURN 

1030 CLEAR ; NT = 1;X = 0; Y = 20200; R = Y; W = 2; Z = 1020 

1040 FOR U = X TO X + IS STEP 2 

1050 CY m 32; PRINT *2, 'ROW', U c 2, ': 

1060 INPUT 'LEFT BYTE?' @(LT) 

1070 INPUT 'RIGHT BYTE?' @<U +1) 

1080 NEXT U 

1090 IF U < 21 INPUT '2 FIGURES?' T; IF T K = 20; GOTO 1040 

1100 U - -43; GOSUB Z; 0 = 6965; GOSUB Z 

1110 U = 10240; GOSUB Z; U = 20210; GOSUB Z 

1120 U * -13871; GOSUB Zj U = -1936; GOSUB Z 

1130 U = -32690; GOSUB Z; U = 12288; GOSUB Z 

1140 U = 2432; GOSUB Z; U = 527; GOSUB Z 

1150 U = -247; GOSUB Z; U - 78; GOSUB Z 

1160 W = 1; Y = Y - W; FOR S = 0 TO U 

1170 U = @(S); GOSUB Z; NEXT S 

1180 PRINT 'READY'; K - KP; CLEAR 

1190 2(20203) = 0; CALL R 

1200 IF X > 21 X(20203) = 75; X(20213) = 129; CALL R 

1210 CY = 0; PRINT 'OK?'; IF KP # 13 GOTO 1210 

1220 :PRINT ; NT = 2; PRINT ; PRINT 'CLEAR'; CY = -32 

1230 FOR X = R TO Y STEP 2 

1240 PRINT #5, 'X(', X, ')=', #8, 5£(X) 

1250 NEXT X; PRINT ':RETURN; RUN 
1260 :RETURN; .END 
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flstrnUici ° ne fi ° f , thG edifications that haue been incorporated into the 
S ‘° ^ etherboard is the reduction in the power supply 

voItage. Dan Koppen is doing roughly the same thing to his Bally board 


Krazy Koppen's Heat Sink 


space invader out of the sk^ Weff Krazf knnn! sh .°°V^ £ 0Ur last 
cure for youi! y ‘ 6 Kraz y Koppen just might have the 



on 1ndef1nately!" e Hope U you W hav e t the Im^riuTuT" my maCh1ne 


Dan Koppen 
(804)-484-1907 
Suffolk, Va. 
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4 : RETURN 

5 . NIM 

6 .R HILFERDING 

10 CLEAR ;GOSUB 9000 

20 NT=0;M=15;K=0> J=0;F=0;CLEAR 

30 &(9)=300;FC=0;BC=117;CY=0;CX=-49; INPUT “1 OR Z PLAYERS?"X 
40 IF <X< 1 )+(X>2)G0T0 30 
50 IF X=2G0T0 150 

60 CLEAR ;CY=0;INPUT 'DEGREE OF DIFFICULTY:1-37*Y 
70 IF YC1PRINT "THAT'S CHEATING!';GOSUB 7000;GOTO G0 
80 IF Y>3PRINT 'ITS HARD ENOUGH AT 3!';G0SUB 7000;GOTO 60 
S0 IF Y=1R=1 
100 IF Y=2R=RND (2) 

110 IF Y=3R=Z 
120 CLEAR ;CY=0 

150 CLEAR ;&(9)=300;BC=7;FC=36;PRINT * WHO WANTS TO GO FIRST? 
160 PRINT ‘1-PLAYER 1 

170 IF X=2INPUT '2-PLAYER 2'Z;G0T0 190 
180 INPUT '3-COMPUTER*Z 

190 IF (Z<1)+(Z>3)PRINT 'IS THIS TO TOUGH?“;GOSUB 7000;GOTO 150 
200 IF Z=2IF X=lGOTO 150 
210 IF Z=3IF X=2G0T0 150 
215 H=Z;IF Z=3H=1 

220 CLEAR ;FC=0;BC=134;GOSUB 5000 
230 IF Z=3G0T0 4000 
1000 CY-0;PRINT " PLAYER #*,#1,H 
1010 P=KN(H)cl27+2 

1020 CY=-10;PRINT 'HOW MANY BOXES?*,P 
1030 IF TR(H)=0GOTO 1010 
1033 IF P >MGOTO 1020 
1040 M=M-P 

1050 IF X=1IF M=0GOTO 8000 
1060 IF M< =0GOTO 8500 

1070 GOSUB 6000;IF X=2IF H=1H=2;GOSUB 5500;GOTO 1000 

1080 IF H=2H=1;GOSUB 5500;GOTO 1000 

1090 IF X=1GOSUB 5500;GOTO 4600 

4000 CY=0;CX=-50;PRINT "MY TURN 

4010 P=1;M=M-P;R=R-1 

4020 GOSUB 6000;GOSUB 5500 

4030 GOTO 1000 

4600 IF P< =RGOTO 4700 


4700 IF M=1GOTO 8300 

4701 R=R-P 

4710 IF RGOTO 4800 
4720 R=4;GOTO 4000 

4800 P=R;R=4;M=M-P;CY=0;CX^=-50;PRINT 'MY TURN 
4810 GOSUB 6000;GOSUB 5500;GOTO 1000 

5000 FOR T=-75T0 65STEP 10;BOX T,35,5,5,3;NEXT T;T=70;RETURN 
5500 BOX 0,0,160,34,2;RETURN 
6000 FOR A=1T0 P 
6005 BOX T-5,35,5,5,3 

6010 FOR B=35T0 -44STEP -8;B0X T,B,5,5,3;BOX T,B,S,5,3;NEXT B 
6020 T=T-10;IF T=-75G0T0 8300 

6030 NEXT A;CY=22;CX=35;PRINT *1,M,' LEFT';RETURN 
7000 FOR Q=1T0 500;NEXT Q;RETURN 
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8010 

8300 

8310 

8500 

8510 

8520 


8820 

8630 

8635 

8640 

8650 

8660 

8665 

8670 

8680 

8690 

8695 

8700 

9000 

9010 

9020 


9050 

> 


CLEAR ;NT=3;CY=0;PRINT * I BERT YOU!“;GOSUB 7000 
F=F+1;GOTO 8600 

CLEAR ;NT=3;CY=0;PRINT * YOU BEAT ME!*;GOSUB 7000 
K=K+1;GOTO 8600 

CLEAR ;NT=3;CY=0;PRINT * PLAYER *“,#1,H,' LOSES!";GOSUB 7000 
IF H=1J=J+1 
IF H=2K=K+1 

CLEAR ;FC=134;BC=96;PRINT ;PRINT * SCORE:- 
M=15;PRINT ;PRINT 'PLAYER *1", 

IF X=1PRINT ' COMPUTER 

IF X=2PRINT * PLAYER * 2 

PRINT 

PRINT K,;IF X=1CX=10;PRINT F;GOTO 8660 
IF X=2CX=10;PRINT J 

PRINT ;PRINT 'SQUEEZE TRIGGER TO REPLAY 

CX=0;PRINT "OR Robert Hilferding 

PRINT 'PRESS '0' FOR A NEW GAME P - °- Box 1647 

IF &(22)=16G0T0 20 Brandon, FL 33511 

IF TR(1)=0GOTO 8680 

IF TRC1 ) IF X=1NT=0;GOTO 60 

CLEAR ;NT=0;GOTO 150 

FC=134;BC=0;&(10)=140;@(1>=32;2)=78;@(3)=73;@(4)=77;5)=33 

CY=~30;FOR A=1T0 5;TU=@(A);NEXT A 

NT=0;FOR C=-S0TO 40;FOR D=-33T0 -27 

IF PXC C,D )BOX (C+81 )b4-79,(D+30)b4,4 4 1 

NEXT D;NEXT C 

BOX -59,-30,42,9, 2;&(10)=174;RETURN 


NIM is a one or tuio player game where the object is to force your 
opponent into taking the last piece. Starting with fifteen boxes, the 
players alternate in remowing one, two, or three boxes. < KN determines the 
number, TR removes the boxes.) In the one player mode, the computer 
determines how many boxes it will remove. 

The program permits options in who starts, and the degree of 
difficulty option in the one-player mode. Beginning options are entered 
through the keypad while play options are executed through the hand 
controI Iers. 
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BflLCHECK is the name of a program that is used to chock out the operation 
of the motherboard at various times during the manufacture, of the Bally 
Arcade. In the original advertising literature, a Uideocade with this 
seIf-check ing ability was to have been made available, but it was never 
done as far as I have been able to determine. But by George, one looks to 
be upon the very near horiz on. The program (available at #6.50) has been 
successfully entered into a PROM, and the plan is to make up a BALCHECK 
device for sale at a reasonable cost. The unit will connect to the 50-pin 
connector at the rear, and it is also very possible to package it into a 
cartridge-sized box so that it will slip into the game slot. This device 
will then analyze your machine, looking at a number of various items, such 
as keypad operation, chip functions, color display (it puts up a beautiful 
rainbow effect with every one of the 256 colors on the screen), and has the 
capability to accept machine code. If it finds some discrepancy, it uses a 
pair of alpha-numeric LEDs to indicate, through a code, where the problem 
is located. I expect Dick Belton, 4906 Willshire Ave., Baltimore, MD 21206 
to have an ad in the next issue. 

UU-1 COMPUTER is the commercial version of what we wilI essentially have 
when the Add-Under is coupled to the Arcade, except for high-resolution 
graphics. These units are in use by professionals in the graphic arts, and 
the current issue of Creative Computing (June) contains an article written 
by Frank Dietrich and Zsuzsa Molnar describing and illustrating in color 
someof the graphics that they have obtained with ZGrass using the UU-1 
computer. In scanning the article, I bel ieve that those effects could be 

generated with the Extended Basic without too much difficulty. 

A grubby piece of paper was shoved under the door, and on it was a 
note and a sketch - the note said, in greatest Through the Looking Glass 
tradition, "TRY ME". The sketch is reproduced here, showing the five 
resistors that exist just underneath the TU output connector inside the RF 
modulator. The two outer resistors and the center one are suggested to be 
cut out entirely, while the remaining two are suggested to be shorted with 
bits of wire to take them out of the circuit. Supposedly, the output is 
enhanced. It has helped my set. 


DEFUSE Modifications. Dieter Heinerman sent in the following as a 
result of some comments and suggestions from Bob Dahl: 

270 A=RND(100)-l; B=RND(100)-1 
280 C=RND(100)-l; IF A>0 GOTO 310 

320 PRINT " SIGNAL ",10000-ABS((A+B+Cbl00)-(D+E+Fbl00 ) ) 
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The UIPER SYSTEM 1 is the first of a series of custom manufactured, 
quality products made for the Bally Home Computer/ProfessionaI Arcade. 
With this system, you can begin the solution of your Bally from the 
Professional Arcade to a powerful graphic computer. The UIPER SYSTEM 1 is 
a .l°t more than J ust a 16t < memory expansion. Features and capabilities are 
listed as follows: one dual position front panel select switch for 
starting the memory at either S or 24K. This will, make it convenient for 
the user to copy any game cartridges and run them in extended RAM where 
they can be modified or copied to tape. Next, one dual position front 
panel switch for Auta-Write-Protect or Programmable Write-Protect. The 
Automatic Write-Protect mode allows the user to load Jay Fenton's excellent 
new 8 K Extended Basic from tape, and then use the Basic to write programs 




sted as follows: 
arting the memor 


in the remaining 8 K. The Programmable-Write-Protect allows 
Write Protect or Write-Enable the entire 1GK RAM board with simple 
statements. Next, the RAM board located inside the cabinet has two eiqht 
position DIP switch packs. Switch pack one enables 4, 8 , or 1GK bank 
selectable addressing, and switch pack two controls special bus functions 
to the Bally and selects either external or internal clocking. SYSTEM 1 
also includes a fuse-protected +/- S volt and +/- 12 volt power supply 
These voltages provide power to the RAM and keyboard interface circuitry 
Also included is a heavy duty grounded AC line cord, and filtered AC outlet 
on e back that is controlled by the front panel switch. The SYSTEM 1 
n erface Board provides the bus conversion from the Bally to the UIPER 
ous, plus a serial keyboard interface which will allow the use of a UIPER 
or other serialized ASCII keyboard with the system. It also includes one 
bus cable connecting the UIPER to the BaI Iy. The RAM board and keyboard 
SYSTF^ " nP !^ gged fr ° m the SYSTEM 1 °"d l«t.r plugged directly into the 
! *° Ut an y changes because the equipment is completely (software 
SYsrr« ar f ,a ^"P^ible. For those of you who are home-brewers, when the 
SYSTEM 1 is upgraded to a SYSTEM 5, the SYSTEM 1 cabinet, power supply 
c?rm + S int ®'' face card can be used to help prototype your own computer 
circuits. The entire system is housed in an attractive heavy duty black 
uminum cabinet with simulated wood grain side panels and custom 
silk screening. The dimensions are 10'xl0-x4-l/4* 

of tho° HRC™iHN“fK nSe : 8 CQl r d “ h * n ° r ‘9‘ n “ l| y <■«»«•» l..d In past issuos 
* £ + ® 6Cn seueral changes and improvements made to 

advert + and Interface Card - Therefore, please refer to this 

inform + 6 Following advertisements for accurate product 

nformation. Pacing, and ava i I ab i I ity. SYSTEM 1 is available now for 
“ Extended Basic, on tape and with documentation comes with each 


excel Ient 
programs 
ws you to 


the BaI Iy and 


and switch pack two 
Iects either external 
-protected +/t- 5 wo lt 


Al tei 


Gardiner, ME 04345 



ADS 


SUPER SOFTWARE announces their "Super Software Spectacular Summer Sale". 
Now all programs and listings are *10.00 off!! Send for your free catalog 
and free Bonus Coupon. 'Super Software P.O.Box 702 Plainfield, NJ 070S1 

Now Available... *5.00... SUMMER 1981 BALLY Professional ARCADE Software 
and Hardware SOURCEBOOK 

Over 300 listings covering all known software and hardware sources. 
Ccomplete index of programs that have been printed in the ARCADIAN and 
CURSOR Newsletters. Dick Houser 635 Los Alamos Ave Livermore CA 94550 

FOR SALE: Bally arcade with SPACE INUADERS, BALLY PIN, BASEBALL, FOOTBALL, 
BLACK JACK, STAR BATTLE, MATH, LETTER MATCH, PANZER ATTACK, SEAWOLF, 
CLOWNS, 280 ZZAP, BASIC cartridges and cassete interface. *400 or best 
offer. Jack Lampcov, 27746 Pierce, Southfield, MI 48076 313-599-6818 

FOR SALE Bally with virtually everything. 14 Bally Uideocades, 6 Wavemaker 
tapes, 1 year of Cursor tapes, most I iterature - over *800 worth for *500: 
R.L.Thersen 69 St. Thomas Ct Pleasant Hill CA 94523 

COMMUNITY COMPUTER1ST's DIRECTORY is similar to a telephone book for 
locating people or companies having similar interests. The white pages 
list people with a paragraph of what they are working on, working with, or 
want to see available. The yellow pages are advertising areas for people, 
businesses and organizations. July issue will be *3.50, from P. 0. Box 40 
ForestviI Ie, CA 95436 

HAND CONTROLLER REPAIRS With factory prices now at *45/pair, it pays to 
have problems fixed - contact Dave Stocker, 333 Coronado Dr., Mt. Uernon, 

IN 47620 


- 90 - 


ARCADIAN 

Robert Fabris, pixillated 
3626 Morrie Drive 
3an Jose, CA 95127 
The Source, TCD 959 


FIRST CLASS 
U. S. POSTAGE 

PAID 

Sunnyvale, CA 
Permit No. 931 




July 9, 1981 


■ <RRcapmiN 

if W * 



Vol. 3, No. 9 


UOCALIZE? Yes, with the Z-GRASS-32 Add Under. Latest word, ju^t 

received two days before we went to press-gia The SOURCE, is that the 

_ f 7 d Under u,iM hawe a “talking” voice interface! More details on this as 

they come in, but for the present, the specifications for the Add-Under 
have been decided upon by all concerned parties, and the unit is GO for a 
late '81 delivery. It will not have a built-in disc interface capabi!ity, : 
but will be configured to accept this as a plug-in optional feature. RAM 
count is now 16K, while ROM is 32K. The 1GK RAM will be expandable to G4K 
by simple substitution of chips plus a couple of board wiring changes. The 

h 1S ° 15£ rf ; Ca U ’ i " SXPand thS RftM t0 64K ’ S ° thQt the fuM “P system could 
nave 128K of memory! 

°?iri^ T 0f ° th6r efforts: The following cartridges are in manufacture: 
GALACTIC INVASION, BIORYTHMS, and PIRATES CHASE. In work and almost ready 
to go are: SPACE FORTRESS, CHECKERS, and MUSIC. This last cartridge will 
have a GK program to self-store your musical compositions while you are 
worklng on them, plus a built-in tape cassette interface to allow you to 
directly transcribe to and from tape for long-term storage. The Arcade 
itself is in production, as is the new AstroUision Basic cartridge, and the 
manual for the cartridge is now being proof-read. Scheduled availability 
date of the Basic is late August. 

• PERSONNEL CHANGES Michael Peck is now the President of AstroUision 
replacing Dan Dawson in the third week of June. I spoke with Mr. Peck, and 
he is very interested in getting the AstroUision steam roller under way 


John Perkins is working for AstroUision as 


consultant, primarily 


interested in getting the Add-Under into production, while Brett Bilbray is 
also working for them, with responsibilities in the production Arcade area. 
George Moses is doing a lot of work for AstroUision in the production of 
the new Manual to accompany the AstroUision Basic cartridge 

' S ^ he name given b y Dick Belton to his version of the Ba I check 
program the factory uses to check the motherboards prior to installation in 
the cases I received a sample of his effort - it is a compact box, about 
2x2x4, with two LEDs for readout, and two cables to conect to the Arcade. 
One goes to the 50-pin connector, the other to the 5 volt supply at the 

checkout" and^f^ ^ “ BO« through the routine of 

checkout, and if a failure is found, the LEDs indicate the area of failure 

J * ^tem. It also includes the machine code input routine. 
Check Dick s ad on p. 100. * 

• f DGE ™ G f ar " again bein 9 so,d hy Roger Saunders. These little stick-on 
labels are placed on the spine of your game Uideocades so that you can read 

i, j: r « ,ht are st ° rod ■" <*•=—«• 2 r«.k. m.i 

III , tKe hCmd COntrolie r Plugs. See his ad on p.97. 

to the wise!?" rSPOrt thSy SXPeCt PriCSS t0 riSS SO °"’ s ° <■ -or,d 

• SPINNING WHEEL is a combination program that Tom Owczarek uses at Fa ires as 
a fund raiser. The first part takes the place of the old 'round and around 


J she goes' wheel of fortune 


with an RNDC30) plus exploding box display while 


Iher. are thrl a 3 " h ‘° h ° f th » 30 *• **>• one. Then 

K ! designs and dummy advertising messages mhich gou mould 

lalt for -P? n9 ° l° r U a Ur “s” 3 "' U ” 60 l ° '■.«<.« fl«™. end a,mays 

.wait for Place Your Bets" before making any entries. 


<\\ 


© 1981 Robert Fabris 
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■ • 2 .SPINNING WHEEL 

3 • 

;.;i0 BC=200;FC=215 



15 GOSUB 250 
17 &(10 )=176 
20 NT=1 
30 CLERR 
40 Z=0 


50 CX=-20;CY=25;PRINT "SPINNING" 


55 BOX 29,0,20,10,3 
, 60 FOR R=RND (30) 

70 CX=-10;CY=0 


80 PRINT fl 
-90 B=RND (30 )b2;BOX -50,-20,B,B,3 
100 Z=Z+1 

110 IF Z< 50GOTO 60 

120 CLEAR 

130 CX=-10;CY=35 

140 PRINT "STOP- 

145 FOR Z=1T0 250;NEXT Z 

150 CY=20;PRINT " WINNING NUMBER IS" 

152 FOR Z=1T0 250;NEXT Z 

'155 CX=-15;CY=0 

;156 PRINT "a “ , #1, R, * 

160 FOR M=1T0 2000;NEXT M 

170 CY=-2S;PRINT " PLACE YOUR BETS!“ 

180 PRINT " MAX. 4 NO. PER PERSON" 

190 M=KP 

191 IF M=13G0T0 15 

192 IF M=49G0T0 350 

193 IF M=50GOTO 500 

194 IF M=51G0T0 600 

195 GOTO 190 
250 CLEAR ;Z=0 
255 NT=0 

260 &(10 )=142 
270 Z=Z+1 

;^B0 IF Z=27G0T0 300 

CY=-23;PRINT " GOOD LUCK ! 

'300 FOR Z=1T0 1500;NEXT Z;CLEAR ;RETURN 
•$50 BC=111; &( 9 )=255; CLEAR ; LINE -80,10,0 
351 FC=0;&(10)=176;NT=3 


Tom 1 ©wczarek 
2120 Garrick 
Warren, MI 48091 


",;GOTO 270 


360 FOR A=-80TO 80;LINE A.RND (ABS(A)+l)-10,1 
370 NEXT A;LINE 0,-10,0;A=10 

380 FOR C=1T0 20STEP 2;A=A+C;B=Ac6;BOX A-3,-B,1+Bc2,Bb10,1 
390 BOX A-3,Bb3,Bb5,1+Bc2,1;NEXT C;FOR A=-30TO 30 
400 LINE A,-44,1;LINE 0,-10,0;NEXT A;FOR A=-44T0 -11STEP 8 
410 BOX 0,A,ABS(A )cl0,ABS(A )c6,2 


411 NT=10;CY=-15;PRINT * P.A.S.S. 

412 CY=-25;PRINT " BOOTH 

413 NEXT A;FOR Z=1T0 5000;NEXT Z 

419 NT=1 

420 &(9 )=50;BC=200;FC=215;GOTO 170 

500 CLEAR ;&(21 )=0;&(10) = 176;NT=3;BOX 0,-40,158,6,1 
: J305 BC=240; FC=7 

‘510 FOR A=1T0 50;BOX RND (160)-80,RND (88)-44,1,1,1;NEXT AfV 
20 BOX 0,-20,30,10,1;BOX 0,0,20,30,1 
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! 530 LINE 0,0,0;LINE -40,-40,1;LINE 40,-40,1;LINE 0,0,1 
L.540 LINE 0,-20,0;LINE -40,-40,1;LINE 40,-40,1;LINE 0,-20,1;CY=44 
•550 PRINT “ WE'RE OUT OF THIS WORLD 
5G0 FOR Z=1T0 750;NEXT Z;BOX 0,-10,5,10,2 

570 FOR Z=1T0 1500;NEXT Z;BOX 45,-20,2,38,1;BOX 58,-9,20,14,1 

580 BOX 53,-G,8,G,2;BOX 58,-15,18,1,2;BOX 58,-13,18,1,2;BOX 58,-11,18,1,2 3, 

590 BOX G2,-9,9,1,2;B0X G2,-7,9,1,2;BOX 62,-5,9,1,2;NT=1;FOR Z=1T0 5000;NEXT 2% 
GOTO 170 p" 

G00 CLERR ;NT=0 


G05 BC=122;FC=7 
G10 FOR ft=35T0 37;CLERR 
'620 FOR B=1T0 285;TU=A;NEXT B 

■625 FOR C=-80TO 75STEP 4;BOX C,0,1,88,3;NEXT C 
*628 FOR C=43T0 -43STEP -2;B0X -2,C,15G,1,3;NEXT C 
G30 FOR X=1T0 1500;NEXT X 
G32 IF R=35G0T0 G50 
G33 IF R=36G0T0 700 
G35 NEXT R 
640 BC=200;FC=21S 

G45 NT=1;FOR Z=1T0 5000;NEXT Z;CLEAR ;GOTO 170 

650 CLEAR 

651 NT=7 h 

653 PRINT ; PRINT ; PRINT H PARENT ASSOCIATION"; PRINT ; PRINT " OF?.; 

PRINT 

655 PRINT " SCHOFIELD SCHOOL" 

.'660 PRINT ; PRINT ; PRINT ; PRINT ’ WELCOMES YOU TO THE FAIR! 

.664 NT=0 

' 665 FOR Z=1T0 3500;NEXT Z 
670 GOTO 635 

700 . 

701 NT=4 

705 PRINT ;PRINT ;PRINT ;PRINT ;PRINT ;PRINT ;PRINT ;PRINT ;PRINT ;PRINT ;PRINT 
;PRINT .J 

715 CY=0;PRINT " HAOE A NICE DAY 

720 GOTO 664 

. 


.2 . DIAMONDS 

.'3 . BY ROBERT ROSENHOUSE 

' 4 . SUPER SOFTWARE 




10 CLEAR ;B=24;C=25;D=30 
20 FOR T=1T0 DSTEP 2;X=RND (68);Y=RND (27);@(T)=X;@(T+l)=Y 
30 FOR A=1T0 BSTEP 2;B0X X,Y,A,C-A,3;NEXT A 
40 FOR A=1T0 BSTEP 2;B0X -X,Y,A,C-A,3;NEXT A 
50 FOR A=1T0 BSTEP 2;BOX -X,-Y,A,C-A,3;NEXT A 
60 FOR A=1T0 BSTEP 2;BOX X,-Y,A,C-A,3;NEXT A 
70 IF RND (7)=1BC=RND (256);FC=BC+4+8bRND (32) 

80 NEXT T 

90 FOR T=1T0 DSTEP 2;F0R A=1T0 BSTEP 2 
.100 BOX @(T),@(T+1),A,C-A,3;BOX -@(T),@(T+l),A,C-A,3;BOX -@(T),-@(T+l ) , 
^OX @CT),-@C T+l), A, C-A, 3 
: 110 NEXT A; NEXT T;«WW. .. 


^3 















O HI RES Modification as created by Perkins Engineering - latest word is that 
the system is available to experimenter-types who can do their own 
programming. Due to other committments at the present, Perkins is not 
available to develop software. So if you want to work on it yourself, and 
be a real originator, you can buy the kit at #250, or the built up/tested 
unit at #350 (using your board). 


or call out, 
or sale and 


KLUDGE Board written up on page72has 'an error in the transist 
it should be ZN4401. Barry Ellerson now has some p.c. boards f 
a clock kit - see his ad on p. 100. 



Pool is a computer version of the Billiards 
game 8-Ball. The computer will rack the 
balls and break. The direction of the Cue 
ball is controled by JX(1) & JY(1). The 
length of the shot is controled by th6 cue 
stick at the right of the screen. After 
selecting the desired angle & length, pull 
the trigger TR(1) to make the shot. The 
direction of any other balls hit by the Cue 
ball is controled by KN(1). If KN(1) is at 
its center the other balls will continue in 
the same direction as the Cue ball. Turning 
KN(1) all the way clockwise or counter¬ 
clockwise will deflect the balls 45 degrees 
from the path of the Cue ball. 
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;BC=170;FC= 


10 .POOL 

20 .BY BOB HENSEL 

30 :RETURN ;&C3)=39;&(0 )=170;&(1)=170;&(2)=30;&C3)=30;CLERR 

40 S=1;T=0;NT=0;BOX -3,-2,155,83,1;BOX -3,-2,152,79,2 . 

50 X=75;FOR Y=-42T0 38STEP 2;B0X X,Y,1,1,1;NEXT Y;X=76;F0R Y=-42T0 38STEP 10;B 
OX X,Y,1,1,1;NEXT Y 

60 X=76;FOR Y=-42T0 38STEP 10;BOX X,Y,1,1,1;BOX -70,32,20,12,1;BOX -70,-35 20 
12,1;BOX 0,-35,23,12,1 

70 BOX 64,-35,18,12,1;BOX 64,32,18,12,1;BOX 0,32,23,12,1 
80 CY=10;CX=19;PRINT "POOL';CY=-10;CX=- 8 ;PRINT “BY BOB HENSEL";NT=5 
90 X=-30;Y=4;B=-8;D=1;FOR R=1T0 5;FOR C=1T0 D;Y=Y- 6 ;B=B+9;IF B>10B=1 
100 GOSUB 400;NEXT C;D=D+1;Y=RBSCY)+ 6 ;X=X- 6 ;NEXT fi 
110 BOX -42,-2,1,3,3;B0X -42,-2,3,1,3 

120 B=0;Y=-2;FOR X=36T0 -24STEP - 6 ;GOSUB 400;GOSUB 400;NEXT X 

140 FOR R=1T0 8;FC=90;FOR C=1T0 50;NEXT C;MU=60;FC=7;NEXT R;BOX 0,-2,144,42,2 
150 @C0)=RND (19)+5;@(16 )=RND C4)+5;@C33 ) = -71;@C34)=37;GOSUB 460;GOSUB 400;FOR 
B=1T0 15 

160 <§>CB)=RND C19)+3;@CB+16)=RND (12 )+l;GOSUB 460 
170 GOSUB 400;IF PXCX+2,Y+2)=0GOSUB 470 
180 NEXT B;GOTO 210 

190 @C0)=13;@(16)=7;GOSUB 400;GOSUB 460;GOSUB 400 
200 @C33 )=@C33 )-6 

210 S=S+1;C=-40;Q=2;BOX 79,0,2,88,2 
220 BOX 79,C+Q,2,2,1;IF TRC1)=1GOTO 270 
230 Q=Q+2;IF Q<80GOTO 220 
240 BOX 79,C+Q,2,2,2;IF TRC1 )=1G0T0 270 
250 Q=Q-2;IF Q<0GOTO 230 
260 GOTO 240 

270 B=0;Q=Qc2;MU=60;IF JXC1)=0IF JYC1)=0GOTO 300 
275 GOTO 290 

280 W=KNC 1 ) ; IF RBSC W X65G0T0 300 
282 W=Wc65;IF U=0U=W;GOTO 300 
-284 IF H=0H=W; GOTO 300 
286 H=0;GOTO 300 
290 H=JXC1);U=JYC1) 

300 GOSUB 460;J=X+Hb6;K=Y+Ub6;IF (J<-75)+(J>70)H=-H;MU=60;GOTO 300 
304 IF C K<-40 ) + C K>35)U=-U;MU=60;GOTO 300 
306 IF PXC J,K+2 )=0GOTO 330 

310 C=B;FOR R=0TO 15;IF C@CR)=@CB)+H )bC@CR+16)=@CB+16 )+U )B=R 
320 NEXT R;IF B#C MU=60;GOTO 280 
330 BOX X,Y,5,5,2 

340 X=J;@CB)=@CB)+H;Y=K;@CB+16)=@CB+16)+U;GOSUB 400 

350 IF PXC X+2,Y+2)=0GOSUB 470;Q=0;IF B=0GOTO 190 \ 

380 Q=Q-1;IF Q>0GOTO 300 

540 BOX 0,0,146,50,2;CX=-23;CY=8;PRINT "GRME OUER 
550 PRINT ;CX=-41;IF T#1SPRINT "8 BRLL LOSER 
560 IF TRC1)=1G0T0 30 
S70 GOTO 560 


I 


390 GOTO 210 

400 MU=50;IF B=0BOX X,Y,3,3,3 
410 IF B>7B0X X,Y,1,3,3 
420 IF B=8B0X X,Y,3,1,3 
430 BOX X,Y,5,5,3;RETURN 
440 @C 33)=@C 33)+6;IF B>8@C33)=@C33)-6;@C34)=@C34)+6 
450 RETURN 

460 X=@C B)b6-75;Y=@C B+16 )b6-44;RETURN 

470 GOSUB 400;Y=41;X=@C33);@CB)=0;IF B>8X=@C34) 

480 MU=70;MU=71;MU=72;MU=73;MU=74;MU=50;MU=48;GOSUB 400;GOSUB 440;IF B#0T=T+1 


510 IF T=15G0T0 540 
520 IF B=8G0T0 540 
530 @CB)=30;RETURN 


SS 
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4 .OLD BENT NOSE 
r 5 -BY BOB WISEMAN 
10 Q=1100;GOTO Q 
100 fl=12;GOSUB H;GOSUB I 
110 GOSUB K;IF UGOTO 190 
115 B=A+W-5bU;IF A=BGOTO N 
120 IF ( B< 0 )+( B >2-4 )GOTO N 

130 GOSUB I;A=B;GOSUB H;GOSUB I;FOR X=1T0 9;MU=25;NEXT X 
170 GOSUB K;IF UbU+WbWGOTO 170 
180 GOTO N 
190 IF @( A X0GOTO N 
195 GOSUB I;RETURN 

200 GOSUB 600;GOSUB 100;L=A;IF @(L)=0GOSUB 1000;GOTO 
220 GOSUB 500;GOSUB 100;IF A=LGOSUB 220 
230 IF @(A)=0GOSUB 1000;A=L;GOSUB H;GOSUB J;GOTO D 
235 GOSUB H;GOSUB 500;FOR X=1T0 Q;NEXT X 
240 IF @(A)#@(L)GOSUB 700;GOTO D 
250 GOSUB 800;GOTO D 

310 W=Ac5;C=28-15bW;R=RMb15-26;RETURN 
320 BOX R,C,15,15,3;RETURN 
330 U=TR(P );U=JYC P);W=JX(P);RETURN 
400 BOX R,C,15,15,l;BOX R,C,13,13,2 
410 IF T=1B0X R,C,11,5,l;BOX R,C,5,11,1 
420 IF T=2B0X R,C,11,11,1;BOX R,C,7,7,2 
430 IF T@C A)=-T 
440 RETURN 

500 F=@C A)c2;BOX R,C,11,11,1 
.505 S=C+3;G=RM;IF GBOX R-3.S,1,3,2;B0X R-3,S,3,1,2;BOX R+3,S,1,3,2;BOX R+3,S,3 
1,2 

-.510 IF G=0BOX R-3, S, 3,3,2; BOX R-3, S, 1,1,1; BOX R+3, S, 3,3,2; BOX R+3,S, 1,1,1 
^515 F=Fc2;Y=RM;IF YBOX R,C,1,1,2 
520 IF Y=0BOX R,C,3,1,2;BOX R.C+2,1,3,2 
525 F=Fc3;BOX R,C-3,7,3,2 
530 IF RM=0BOX R,C-2,5,3,1 
535 IF RM=1B0X R,C-4,5,3,1 

540 NT=30;MU=49+9bG;MU=49+9bY;MU=49+4bRM;NT=3;RETURN 
800 P=3-P;CX=M;PRINT "PLAYER",#2,P, S TURN",;BC=232;IF P=2BC=56 
605 RETURN 

700 T=0;GOSUB J;A=L;GOSUB H;GOSUB J 
710 CX=M;PRINT "IS NOT A MATCH ",;RETURN 
800 T=P;GOSUB J;GOSUB 850;A=L;GOSUB H;GOSUB J;GOSUB 850 
805 CX=M;PRINT "MATCH!! MATCH!!", 

810 FOR X=0TO 24;IF @(X ) >0RETURN 

820 NEXT X; CX=M; PRINT "IT'S A DRAW. ", ; GOTO 910 

850 B=Ac5;C=RM;B=Bb5 
860 FOR X=0TO 2 

870 IF (@(B)=@CB+1 ) )b(@CB+l)=@CB+2))GOTO 900 
880 IF (@(C)=@(C+5))b(@(C+5)=@(C+10))GOTO 900 
885 B=B+1;C=C+5;NEXT X;RETURN 
900 CX=M;E=l;PRINT “YOU HAUE WON!!!", 

910 FOR A=0TO 24;GOSUB H;IF @(A)=0GOSUB 1000 
920 IF @( A) >0GOSUB 500 
930 NEXT A;STOP 

1000 BOX R,C,11,11,1;BOX R,C-3,9,1,2 
1005 FOR ; X*0JO+3:S BOX R-3+2bX, C-3, 1,3,2; NEXT X 
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1010 BOX R+3,C+3,3,3,2;BOX R+3 


_ W»BOX R-3,C,3,1,2;B0X R-2,C+f,3,.l,2 

1020 BOX R 1,C+2,1,1,2;BOX R,C+3,1,3,2;BOX R-3,C+3,3,1,2;BOX R-3,C+3 1 3 i 
1025 IF ERETURN ’ ’ ’ 

1030 CX=M;PRINT "RCK! BENT NOSE!", 

1050 FOR X=1T0 30;MU=87;NEXT X;T=0;GOSUB J;CX=M;PRINT “HE HIDES AGAIN “ 
1080 R=RND (24); IF ©CRKIGOTO 1080 
1080 @(A)=@(R);@(R)=0;RETURN 

1100 T=0;P=2;M=-40;CY=40;CLEAR ;H=310;1=320;J=400;K=330;N=110 
1110 FC=119;E=0;FOR A=0TO 24;G0SUB H;GOSUB J 
1120 B=Acl3;@(A )=RM+1;NEXT A;@(12)=0 

1130 FOR A=0TO 24;B=RND (24);C=@(A);@(A)=@(B);@(B)=C;NEXT A 
11,40 D=200;GOTO n 


*** OLD BENT NOSE #** 


THIS IS A TWO PLAYER GAME PLAYED ON A FIVE BY FIVE GRID. THE 
OBJECT OF THE GAME IS TO GET THREE OF YOUR MARKERS IN A STRAIGHT 
LINE HORIZONTALLY OR VERTICALLY. PLAYER ONE USES PLUS SIGN MARKERS; 
PLAYER TWO USES ZEROES. ON THE GRID, TWELVE PAIRS OF FACES ARE HIDDEN. 
WHEN IT IS YOUR TURN, USE THE JX AND JY ON THE GAME CONTROLLER TO 
MANUEVER THE REVERSED BOX TO THE SQUARE THAT YOU WANT TO GUESS. PULL 
THE TRIGGER. NOW GUESS ANOTHER, TRYING TO FIND THE MATCHING FACE. 

IF THE TWO FACES THAT YOU HAVE EXPOSED MATCH, THEN YOUR MARKER IS 
PUT ON THOSE SQUARES. FIRST PLAYER TO GET THREE OF HIS/HER MARKERS 
IN A LINE (NOT DIAGONALLY) WINS. BUT WATCH OUT!! OLD BENT NOSE 
IS HIDING OUT THERE TOO. IF YOU PICK HIS SQUARE, YOUR TURN ENDS 
AND OLD BENT NOSE TRADES PLACES WITH ANOTHER HIDDEN FACE. THIS GAME 
COMBINES GUESSING, MEMORY, AND STRATEGY. 


MUSIC FOR GAMES 
10 FOR A=256 TO 0STEP -4 
20 &(23)=A;&(21)=A;&(19)=200 
30 IF A=4A=256;IF TR(1)A=0 
40 NEXT A:&(23)=0;&(21)=0 


BY MIKE PEACE 



22 (jame .a one now available AIL 
mne Full lemony. <£ Display Loin 
of (jnapkicn,AciiortfSouna and 

Colon.. .Arm two on Cann- 
K elie . % 10.00 



WnJuie Ion (nee pic- 
luned (dialog,. 

L&Fl Soliwane 

1C L Fnamewood,On 
1 ewbunqk .IN. 
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Super Software 


Eighteen programs for the 
Bally Computer System!* 


carry all game cartridges 
^at low discount prices!! 


Super Software 


ONBOARD CALCULATOR,(#), has not been utilized fully. Th& ARCADIAN tutorial 
on its basTc* operation was published in Uo I 1, p.32. At that time, each 
digit of each number had to be individually entered, an arduous task. 
Then, in UoI 2, p.2, Gerry Halquist presented a loan payment program wth 
greatly simplified input, but still having restrictions (such as interest-, 
had to be entered in 5 digit format). Now Jess Shad Ie has made up a number 
of programs where the input format can be almost anything and the program 
will accept and utilize it. One program is included this issue, Compound 
.Interest. Some notes: 

entering principaI-you can use either &1000 or 1000.00 or 1,000.00; 
if you do not use &, then you must press I after the amount. Entering 
interest, any of the following will work: 5.2% .052 5.2 but no 

fractions. Term of loan must be in years. If you make an error, HALT the 
program and start again. 

If you find this program of value to you in this application or any other, 
send Jess a buck to help keep his creative juices flowing. He currently 
-fs working on trig functions, quadratic equation solutions, sinking fund 
solutions, and similar programs - primarily for Blue Ram application. 


The capability to do these functions is not included in the AstroUision 
Basic, being removed for other features. The routine reside in the Bal ly 
Basic between locations 2194H and 222GH, plus some subroutine calls. When 
the UIPER system becomes more in use, one could transcribe the routine into 
the UIPER, store the routine on tape, and have it available for when the 
occasion demands. 

For those of you unfamiliar with the calculator format, it is 
«n@(x),@(y),@(z) where n is one of the four arithmetic operators: + - x t 
5 (<^(x) wiI I be the string location of one of the two numbers being worked 

on while @.( y) is the string location of the other.^(z) is the string 
location of the answer. 

36 











<RRCRDim 


i— • 

2 . 

3 .COMPOUND INTEREST 

4 .BY JESS SHRDLE 
10 CLERR 

20 FOR fl=0TO 1G5;@(R)=0;NEXT fl 

30 FOR XY=20078TO 20128STEP 2;X(XY)=0;NEXT XY 

31 F=100;G=200 

34 PRINT "COMPOUND INTEREST" 

36 S=2 

38 IF S=2P=6000;GOTO 75 



Jess Shad Ie 
'7 CuI de Sac 
West Chicago, IL 


60185 


70 CLERR ;PRINT “RUNNING";RETURN 

75 @(98)=2;@(99)=1;@(134)=i;PRINT “LORN RMOUNT";PRINT ;GOSUB 3030 
100 CX—32;Z=1;FOR B=RTO SSTEP -1;IF @(B)=“0"IF ZGOTO 130 
108 IF U=0PRINT “$”,;U=1 
110 Z=0 

120 TU=@(B) 

121 IF C B=ll )+(B=29) + (B=47)+(B=65) + (B=83) + (B=101)+( B=119 )+(B=136) + (B=155)PRINT 


130 

140 

200 

500 

510 

520 

530 

540 

550 

560 

561 
570 
580 

.3030 

3040 

3041 

3042 

3043 

3044 

3045 
3050 
3060 
RINT 
3070 
040 
3080 
3080 
3100 
3110 
3120 
3130 
3140 
3150 
6000 
6002 
6005 
6010 
6015 


NEXT B 
U=0;RETURN 

PRINT ".",;FOR B=TTO USTEP -1;TU=@(B );NEXT B;PRINT ;0=0;RETURN 
IF E<2N=7 r H H B 

IF E=2N=25 16020 *-@(54),@(126),@(54 ) 

IF E=3N=61 06030 IF @(62)+@(63)+@(64X145G0T0 6050 

FOR I=1T0 B "6040 GOTO 6010 

@(N+A)=@( 165+J)l6050 PRINT ”INTEREST+LORN";R=17;S=8;GOSUB F;T=7;U=6;GOSUB C 
R=fl-1;J=J+1 16051 PRINT 

NEXT I 
@( 46 ) = 1 

IF E=2IF (@(26) )+(@(27) )+(@(28) )>0®c@( 18),@(36),@( 18) 

fl=0;B=0;C=0;J=0;PRINT ;RETURN 

CX=-30;CY=CY-8 

K=KP 

IF K=31 GOTO 10 
IF K=3GT0=K;GOTO 3040 
IF K=37T0=K;GOTO 3040 
IF S>0IF K=13G0T0 3040 
IF K=44T0=K;GOTO 3040 
IF K=46C=1;T0=46;GOTO 3040 

IF K=73E=1;GOSUB 500;PRINT “INPUT INTEREST RRTE,THEN";PRINT " PRESS T";P 
;CX=-20;GOTO 3040 

IF K=84E=2;GOSUB 500;PRINT "INPUT YERRS,THEN "; PRINT "PRESS P “; CX=-20;GOTO 3 


IF K=80E=3;GOSUB 500;GOSUB 60;GOTO P 


IF K=67ST0P j 6060 u=l;PRINT “NUMBER OF PAYMENTS“;R=107;S=38;GOSUB F;T-97; 
TU=K l U=36;GOSUB G 


"U=96; GOSUB G 
B)=K 16065 PRINT 


@(165+B 

B=B+1 |6070 £RINT "MONTHLY' PAYMENTS 1 ’ 

IF C=1IF E=0U=U+1;IF U=2K=73;G0T0 3060 
IF 0=0R=fl+l 16080 «c@(0), 

GOTCf 3040 |6030 PRINT* 


80), @(80); GOSUB F;' 
INTEREST PAID“ 


=97;U=96;GOSUB G 


#b@( 54 ), @( 80 ), @( 90 ) |6100_g-@_( 0), @( 36 X @( 80); R=107; S=88; GOSUB F; T=37; U=96; 
FOR Q=36T0 53; @( Q )=0 < ^IS<^ “ 

®+@(0),@(36 ),@(36 ) 

®b@(0),@( 18 ), @( 144) 

®;@(0),@( 144),@(0) 
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FOR SALE Computer Ear with documentation and software. #55. Rory Wohl*ij 
3513 Lynnfield, Shaker Heights, OH 44122 
FOR SALE Basic, Interface, all issues of Arcadian Newsletters, Documents, 
10 cassettes, programs, manuaIs, and more. A must for the serious 
programmer. First #100 takes it. Robert Jaeger, 58 Millay Rd. Morganville, 
NJ 07751 201-536-3274 

FOR SALE Baly Basic with Iiterature and Basic, Interface, 8 working hand 
controls, FootbaI I ,BasebaI I ,Star BattIe,GaI actic Invasion (new) videocades. 
works great #300. contact James Schaefer 5314 Blackistone Rd. Bethesda, MD 
20016 301-229-8318 

CLOCK MOD KIT #9.00. Assembled and tested, #11. ppd. Attention!! 
Experimenters, Seruicemen!! Qua I ity, double sided Kludge boards, #4.25 ppd. 
Quantity discounts! Please inquire Barry Ellerson 5017 N. River Rd., 
Schiller Park, IL 60176 312-635- 0859 

BALLYCHECK for problem diagnostics and out-of-case repairs: For Sale 
complete tested unit for #69. including shipping. Two to four week 
del ivery. Kits may be possible. PROMs for BALLYCHECK now available, 
immediate delivery at #19.50 with listing if requested. Includes shipping. 
Arcade Boards repaired and/or tested - one to two week turnover #25 Min 
plus parts and shipping. Contact Dick Belton 301-488-2806 between 4-10 pm 
Eastern time. 


CONTEST ENTRANTS this month were Bob Hensel, with POOL, and Bob Wiseman 
with Old Bent Nose. The winner of the #100 check will be indicated by a 
big # on the program page. The winner will be determined by the judging 
panel who will let me know at the last moment, after this issue is 
complete. Anyway, at this time I can congratulate Bob, who will replace 
Dick Strauss on th^. panel . _ 
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MEMORY EXPANSION COMPARISONS rve*been asked about the memory expansfllqn •’ 
'schemes - the Blue Ram, the UIPER, and the future Add-Under. I real ly 
can't answer “Which is best?" because it depends on what you want to do, 
how involved you want to get, how much you can afford to spend, such type 

factors. A 'problem' with the systems is that they are not directly 

comparable. It is difficult to set up a grading system because each has 
virtues beyond such factors as ' dol Iars per K of memory' or some other 

attempt at rational ization. You have to look at what other features are 

involved with each unit, and what is important to you. In a way it is a 
more comfortable situation than we had over a year ago when there was very 
little to look forward to. 

MORE FOR YOUR MONEY With this issue, we surpass last year's total output 
(106 pages), and by the time we finish the year out, the pages per dolIar 
wiI I also better last year's - even accounting for the postage increase. 
So at least from a volume standpoint, you are beating inflation. Who else 
can state that fact? 

^UIPER SYSTEM You' I I find their ad on page 10S, this time with two photos^’ 

'of their first product output. The last of the parts has arrived, and they] 
-are ready to ship units, with the new Extended Basic Ianguage included. 

■ 'J 

ASTRO UISION BASIC is on schedule, the last obstacle was the necessity to 
drill two holes in the case for the tape jack and the LED level indicator. 
The instruction Manual is in print, and the package should soon be out. 
The Manual includes a program which will allow the new Basic to load 
existing programs (at the 300 baud rate), so that they can be used and 
stored with the new 2000 baud rate. We have a copy here, and are 
translating selected ARCADIAN programs into the new format. These programs 
wilI be made available on tape to purchasers of the new Basic and the total 
Arcade Plus system, and the authors included will receive royalties based 
on program size. 

SPEECH SYNTHESIS for the new AddUnder will use the Uotrax SC-01 Chip. 
This chip implements the ' formant synthesis' technique to model the human 
voice's resonances, making up each of the sounds one utters. These sounds 
are selectively added together by the computer to make up a word, using a 
'phoneme generator' . Each of the 64 available phonemes has an 8-bit code, 
with two of those.- bits used for pitch control. - » 

* ' ■/ : 

'.CONTEST THOUGHTS We have four entries for "Che regular, ongoing prize of 
.S100. this issue: Bally Black Box, DaredeviI, New Sub Search, and Pits.‘tf 
/The winner of this contest wil I replace Dave Ibach on the judging panel .*-•• 
With regard to the future, we wilI be entering an interim period where 
-there wilI be first a few, then more and more of the AstroUision Basics in 
the field, and those owners will (hopefully) become ARCADIAN subscribers. 
Any AstroUision Basic programs submitted on the near future will not be 
considered because the subscriber population will be very small. I'll keep 
a tal ly, and sometime next year we' I I have a date when those programs wil I 
be accepted. C?.**’ "* ; . " 


©1*381 Robert FabrU 
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1 .NEW SUB SEARCH ~ 

2 .BY RON PICARDI 
5 GOTO 100 

10 LINE X+12,Y+Rb2,0;LINE X-10,Y-Rb2,3;LINE X+ll,Y-1+Rb2,0;LINE X-10,Y-l~Rb2,3 

11 LINE X+10,Y-2+Rb2,0;LINE X-8,Y-2-Rb2,3;LINE X,Y,0;LINE X-Rb2,Y+6 3 

12 LINE X+l,Y,0;LINE X+l-R,Y+3,3;RETURN 

20 BOX -30,-30,10,3,3;BOX -28,-28,2,3,3;RETURN 


30 FOR A=1T0 2;FOR B=-20TO 20STEP 3;Q=FC;FC=BC;MU=“!";FC=Q;LINE X,Y,0;LINE X+B 
,Y+20,3;NEXT B;NEXT A;RETURN 

40 FOR A=1T0 10;&(22)=255;FOR B=S0TO 10STEP -1;&(18)=B;NEXT B;&(22)=0;FOR B=1T 
0 30;NEXT B;NEXT A;RETURN 

50 X=0;Y=0;CLEAR ;BOX 0,-20,150,38,1;GOSUB 10;PRINT "SONAR CONTACT";GOSUB 20 
55 FOR A=1T0 10;&(18 )=30;FOR B=255T0 0STEP -10;&(22)=B;NEXT B;FOR B=1T0 30;NEX 
T B;NEXT A;RETURN 

100 CLEAR ;R=0;U=RND C10)bl5-90;O=RND <10 )b5-25;S=RND (10)b!5-90;T=RND C10)b5-2 
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105 C=l;FOR A=-75T0 60STEP 15;F0R B=-20TO 25STEP 5;B0X A,B,1,1,1;NEXT B;NEXT A 
108 CY=-30;PRINT "USE JOYSTICK TO SEARCH 

110 X=U;Y=U;GOSUB 10;GOSUB 10010;CY=40;PRINT “MOUE ,#2,C;C=C+1 

120 U=U+JX(1)bl5;0=0+JY(1)b5;IF U-X+U-Y=0GOTO 120 
■130 IF U>60U=60 

131 IF U<-75U=-75 

132 IF 0>250=25 

133 IF U<-200=-20 7 

140 IF U=SIF 0=TG0T0 200 
145 IF RND C100 ) = 1G0T0 500 
150 GOSUB 10;GOTO 110 

200 GOSUB 50;U=RND (5);0=RND (5);Z=RND (3);S=3;W=3;H=0 

210 CLEAR ;PRINT “SUB WAS,”;IF S>OPRINT “NORTH", 

211 IF S<OPRINT ‘SOUTH", 

212 IF S#OIF W#UPRINT " AND ", Ron Picardi 

213 IF W>UPRINT "WEST 630 Bacon 

214 IF W<UPRINT "EAST Saginaw, MI 48603 * 

215 IF H>ZPRINT “TOO LOW 

216 IF H<ZPRINT "TOO HIGH 

217 IF H=ZPRINT "DEPTH OK 

220 CX=0;CY=24;NT=0;PRINT " 1234 5";CX=0;PRINT "1 * * * * *“;CX=0;PRINT “2 

♦ ***.*" 

221 CX=0;PRINT "3 * * * * CX=0;PRINT "A * * * * *";CX=0;PRINT "5 * * * * * 

230 BOX -1+Wbl2,24-Sb8,7,7,3 

240 CY=0;PRINT "DEPTH",#2,H;NT=3 

250 PRINT "ENTER DATA’;INPUT "N - ”,S;INPUT ”E - “,W;INPUT 'DEPT",H 
260 CLEAR ;BOX 0,-20,150,36,1;Y=0;FOR X=0TO 36STEP 3;GOSUB 10;BOX 0,-X,1,1,3;FO 
R A=1T0 30;NEXT A;BOX 0,-X,1,1,3;G0SUB 10;NEXT X 
270 GOSUB 10;X=0;Y=-36;GOSUB 30;IF 0=SIF U=WIF H=ZGOTO 400 
280 IF RND (5 )=1G0T0 501 
290 CLEAR ;GOTO 210 

400 PRINT "BOOM";GOSUB 20;X=-30;Y=-30;GOSUB 30;GOSUB 20;G=G+1 

410 IF RND (10 )=1PRINT “YOU STARTED WW3";GOSUB 40;PRINT "SELF DESTRUCT IS SET"; 
GOSUB 40;&(8)=3 
420 GOTO 1000 

500 GOSUB 50 

501 PRINT "TORPEDO ATTACK";GOSUB 30;GOSUB 10;Y=-2;GOSUB 10;PRINT "ABANDON SHIP" 
;GOSUB 40 


\ O 2. 











510 GOSUB 10;FOR R=0TO 2;G0SUB 10;FOR R=1T0 30;NEXT fi;GOSUB 10;NEXT R 
520 FOR Y=-2T0 -30STEP -2;GOSUB 10;FOR R=iTO 30;NEXT fi;GOSUB 10;NEXT Y 
530 1=1+1 

1000 CLERR ;PRINT "SUBS SUNK",#2,G,#2;PRINT “SHIPS LOST",#2,I;PRINT "PLRY RGRIN? 
1-YES 2-NO" 

1010 IF &(23)=8G0T0 100 
1020 IF &(22)=8G0T0 1040 
1030 GOTO 1010 

1040 PRINT "OK I HOPE THAT YOU ENJOYED YOURSELF”;STOP 
10000 FOR R=1T0 2000;NEXT R;RETURN 
10010 FOR R=1T0 200;NEXT R;RETURN 

New Sub Search ... 

This revision of the Sub Search printed in an earlier issue of Arcaoian 
has several new and better features* The search mode on the 10 by 10 
sea map is done with the Joystick* you can move your ship in any of 
eidht directions. A move counter is displayed as well as the ship-s 
location. The same will wait for you to usfe the Joystick to move. You 
continue searching until you find the sub or it finds you. 

If the sub shoots you» your ship sinks by the stern. 

When you find the sub* a 5 by 5 sonar map is displayed along with 
information on about where the sub is to the inverse marker. You then 
enter target information. The screen is not cluttered with the variable 
used. Your depth charge is dropped and you hit or miss. 

0h» by the ways* it is possible to cause world war 3. the program 
will self destruct» so be sure it is on tape. If you don't want to 
reload each time it happens* delete 8>=3 from line 410. Your score is 
displayed at the end of each same. Have fun. programmed by Ron Picardi. 

By the way, Ron's output is done using the Wiseman Rppie Interface. 


by Steve Halters 


How the name is played 

game, the computer loc 


e locations of the 5 balls 


The player obtains information about the location of the balls by sending a 
probe into the bo* at one of the 32 edge squares, and observing Its behavior: 
it may emerge at another edge square, be reflected back to the square the probe 
entered, or be absorbed. Based on these observations and the rules for how 
probes move, the player can deduce the location of the 5 balls. 

The rules for how probes move : 

1. PASS-THRU: A probe moves in a straight line unless it comes within 

one square (Including one diagonal square) of a hidden ball. 

A probe which runs directly into a ball is absorbed. 

- probe encounters a ball In its left-front square 

(l.e., diagonally to the left in the direction of travel) It 
is deflected 90 degrees to the right. Similarly, when a probe 
encounters a ball in its right-front square, it is deflected 
90 degrees to the left. 

A probe which encounters a ball in both its left-front and 
right-front corners is reflected back 180 degrees (l.e.. it 


3. DEFLECTED: 


4. REFLECTED: 


reverses direction). 

5. DEFLECTED AT ENTRANCE: A probe which would be deflected before it enters 

the box (because a ball is diagonal to the probe entry location 
In the outer row) is reflected to its starting location. 

6. ABSORPTION DOMINATES: note that when a probe encounters 

an absorption and a reflection or deflection 
situation side-by-side, the absorption 
always dominates. 


+ - + c 

A=straight pass-thru 
B,C,D=deflected right 
or left 

+(left)=reflected 
+(top & bottom)= 

deflected at entrance 
-(bottom & right)= 
absorbed 

-(top)=absorbed which 
dominates over re¬ 
flection in adjacent 
square 
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BftLLY BLRCK BOX 
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1 Y=((R-l)cS)b8-K;X=(RM+l )b8-12 
|2 CX=X;GOSUB 25;CY=YcKb2+Y;RETURN 

3 BOX U, W, C, C, 3;IF (X#U )+(Y#W)MU=J 

4 RETURN < T* | |— | G 

5 FOR M=0TO ZbH;NEXT M;RETURN 

G R=R;GOSUB 1; GOSUB 5; RETURN ,-|—f- -fH E 

7 MU=J;L=L-1;GOTO 79 

8 BOX X,Y,C,C,3;U=X;W=Y;RETURN 

9 B=(Y+K)c8bS+(X+12)c8;RETURN 

10 D=-lbD;GOTO 15 

11 IF flBSC D)=1D=S;F=1;GOTO 15 

12 D=1; F=S; GOTO 15 F 

13 IF RBS(D)=1D=-S;F=1;GOTO 15 

14 d=-i;f=s Multiple deflection 

15 B=E;GOTO 250 paSS-thru 

16 FOR R=1T0 H;IF @(R)GOSUB 1;C=7;GOSUB 8;MU=J;IF U>0IF PX(X,Y)=0Q=Q+5 

17 NEXT R;RETURN 

18 X=-4;Y=K;RETURN 

19 CY=0;CX=-75;RETURN 

20 R=B;GOSUB 1;GOSUB 5;IF R=B TU=43;G0T0 7 

21 TU=L;GOTO 79 

25 IF X=68CX=70 

26 RETURN 

30 IF @(B)GOSUB 6;TU=45;N=1 

31 RETURN 

40 CY=-32;INPUT * INPUT 1-4 PLYRS:"P 

41 IF (PCI )+(P>4)G0T0 40 
48 T=P;U=-l;FOR N=5T0 8;@<H+N)=0;NEXT N 
50 CLERR ; PRINT “ BRLLY”;PRINT * BLRCK“; PRINT “ BOX", 

52 0=0;Q=0;L=64;1=0;T=T+1;IF T>P T=1;1=4;U=U+1 
54 FOR N=-32T0 32STEP 8;LINE 0,N,4;LINE 64,N,1;LINE N+32,-32,4;LINE N+32,32,1; 

NEXT N;PRINT #1,"#',T 
56 BOX 32,0,67,67,3 

60 FOR N=1T0 H+I;@(N )=0;MU=N;NEXT N;FOR N=1T0 5 + 

64 R=RND (8)bS+RND (8)+l;IF @(R)G0T0 64 
66 @C R)=1;NEXT N 

68 IF U=0PRINT ;PRINT * TEST”;GOSUB 16 

79 &(20 )=0;GOSUB 18;GOTO 97 

80 X=JX(T)b8+X;IF X<-4X=-4 
82 IF X>J X=J 

90 Y=JY(T )b8+Y;IF Y<-K Y=-K 
92 IF Y>K Y=K 
94 GOSUB 3 

97 C=3; IF RBSCYKKIF X<JIF X>-4C=5 

98 GOSUB 8;IF TR(T)GOTO 106 
GOTO 80 

=5G0T0 500 

IF RBS(Y)=KIF (X=-4)+(X=J)GOTO 80 
i Q=Q+1;L=L+1;IF L>90L=65 


m 


Deceptive reflectio 
and absorption 


102 
106 
107 
110 

115 GOSUB 19;PRINT #1,”PROBES=“,Q;&(20)=H;NT=H;MU=J;NT=2;GOSUB 9;R=B;G0SUB 2;TU 


130 D=S;F=1;IF Y=K D=-S 
132 IF X=-4D=1;F=S 
134 IF X=J D=-1;F=S 

140 B=B+D;2=18;N=0;GOSUB 30;IF NGOTO 7 


Steve Wa f ters 
556 LangfieId 
Northville, MI 48167 
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150 IF @C B-F)+@(B+F)>0GOSUB 6;TU=43;G0T0 7 
1G0 GOTO 210 

200 E=B;B=B+D;G=BcS;IF (RM=0)+(RM=1 )+?B>89)+(B<12)GOTO 20 
210 N=0;GOSUB 30;IF NGOTO 7 

1220 IF @CB-F)IF @(B+F)GOTO s Now enter the following- 

230 IF @CB-F)GOTO 11 _„ T y ' 

240 IF @(B+Fjgoto 13 NT; TV=0; TV=6; PRINT "&(9)«81; 

250 2=2-2; IF 2<02=0 & 0)=142; &(2)=0; &(3)=0; 

252 GOTO 200 BC-155; FC=7; H=100; J=68; K=36; 

500 mu=j;if u=0T=4 ;goto 50 RETURN; NT=2; PRINT; PRINT; 

510 0=1 -2bPX( X, Y )+0 G0 ' G 4G " 

515 BOX -46,-20,J,17,2;IF 0=4G0SUB 13; ^=-^16; PRINT “LfiST"; PRINT 'GUESS 
520 IF 0<5G0T0 79 
600 GOSUB 16;GOSUB 19;PRINT #1, 

630 IF TRC T )GOTO 640 
632 GOTO 630 

640 CLERR ;CY=32;IF T=PPRINT 'END ", 

642 PRINT #2,"ROUND",U;FOR N=1T0 PjPRINT ;PRINT #1,“#" 

“PPRINT #1,” RUG=",@(H+N+4 )cU, 

648 PRINT ;NEXT N 

650 IF TRCT1G0T0 50 H 

652 GOTO 650 


"SCORE=",Q;@(H+T)=Q;@C H+T+4)=@(H+T+4)+Q 


SCORE=”,@( H+N ),;IF T 


■ 


= 18;CX = -41;PRINT “10”,;CX = 38;PRINT 


ANALOG (NON-DIGITAL) CLOCK 

After the clock face appears on the screen the 
computer will take a few seconds to figure out the 
coordinates for the minute dots and store them in 
array locations 0 thru 119. Then, in the upper left 
corner of the screen you will be asked to INPUT 
“H”, hours, “M”, minutes and “S”, seconds. When 
you press GO you’ll see the three clock hands, in¬ 
cluding a moving sweep second hand keeping 
accurate time. If clock speed needs adjusting 
change the value or R in line 230. A smaller 
number will speed up the clock, and a larger 
number will slow it down. 

1 .ANALOG (NON-DIGITAL) CLOCK 
2.BY GEORGE MOSES 
10:RETURN;NT =0;GOTO 80 
20 D = (C x 10) + (B -r 12 x 2);XY = 0;LINE 
@(D) -r 2,@(D +1) -r- 2,3 
30E = B x2;XY = 0;LINE @(E),@(E +1),3 
40 FOR F = A x 2TO 119STEP 2;XY = 0;LINE 
@(F),@(F + 1),3;FOR T = 1TO RjNEXT 
T;XY = 0;LINE @(F),@(F + 1),3;NEXT 
F;A = 0;XY = 0;LINE @(E),@(E +1),3 
50 B = B + 1;IF B =60B =0;C = C + 1 
60 IF C = 12C = 0 

70XY = 0;LINE @(D)-^2,@(D+ 1)-^2,3;GOTO 20 
80CLEAR ;FC = 140;BC = 0;BOX 
0,0,160,88,1 ;BOX 0,0,100,84,3 
90CX = -2;CY = 36;PRINT “12 
100CY = 32;CX = -27;PRINT “11”,;CX = 25;PRINT 
“1 


Tl 


l O-S 


110CY 

“2 

120CX = -40;CY = 0;PRINT “9”,;CX = 41;PRINT^ 
“3 

130CY = - 16;CX = -37;PRINT 
“8”,;CX = 38;PRINT “4 
140CY = - 32;CX = -24;PRINT 
“7”,;CX = 25;PRINT “5 
150CY = -36;CX = 1;PRINT “6 
160 @(0) = 0; @(1) = 30;@(2) = 4;@(3) = 30; @(4) 

= 9; @(5) = 30; @(6) = 13; @(7) = 29; @(8) = 

17;@(9) = 28;@(10) = 21;@(11) = 27 
170 @(12) = 24; @(13) = 25; @(14) = 27;@(15) = * 

23; @ (16) = 29; @ (17) = 21; @ (18) = 31; @ (19) 

= 18;@(20) = 32;@(21) = 15 
180 @(22) = 33; @(23) = 12;@(24) = 34; @(25) = 

9; @(26) = 35; @(27) = 6; @(28) = 35; @(29) = 

3; @ (30) = 35; @ (31) = 0 

190 B = 28;FOR A = 32TO60STEP2;@(A) = @(B); 

@(A +1) = — (@(B + 1));B = B -2;NEXT A 
200 B = 2; FO R A = 62T O90ST E P2; @ (A) = -(@(B)); 

@(A + 1)= -(@(B + 1));B = B +2;NEXT A 
210 B =28;FOR A = 92TO 

118STEP2;@(A)= -(@(B)); 

@(A +1) = @(B + 1);B = B - 2;NEXT A 
220 FORA = 0TO118STEP2;BOX 
@(A),@(A + 1),1,1,0;NEXT A 
230 R = 378 

240CY = 40;INPUT“H”C;CY = 40;INPUT 
“M”B;CY = 40;INPUT“S”A;BOX 
- 65,40,30,8,1 ;GOTO20 wMmms 
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5,15B,11,2;Y=5;F0R^X=-68T0 
40",;CX=W;P 


1 


1 . D^RSDtUlL 
2 . BY DRUE MARTIN 

5 U=7; U=8; L=0; W=35; J=lfl T= 100 . 

10 CLERR ;NT=0;BC=0;FC=253;BOX 0,35,160,13,f;BOX H; 

70STEP 2;A=Xc20;A=ABS(RM);BOX X,Y,1,1,1 
20 BOX X,Y+l,1,3,R=0;BOX X,Y+2,1,5,fl=10;NEXT X;CY=15;CX=-52;PRINT 
RINT 280;BOX 0,-5,45,J,1;BOX 0,-5,43,9,2 

30 Y=-15;X=60;BOX X,Y,33,13,1;BOX X,Y,31,13,2;BOX X,Y,21,25,1;BOX X,Y,21 23 2; 
CX=-30;CY=-15;PRINT "MILES TO GO 

35 CY=-35;CX=52;PRINT “TIME";GOSUB G60;BOX 0,22,43,J,3;BOX 0,22,41 J 3;fl=RND ( 
10)+20;Y=R;M=0;T=0;P=1;N=5;GOTO 50 ’ “ 

40 P=RND (3);IF P=1P=5 
50 IF RBSC L)>17GOTO 430 

^ G0 GOSUB 650;GOSUB 450;GOSUB Bbl0+G0;GOTO 200 
70 M=Mb3+RND C10 )+20;RETURN 
' ,>80 M=Mb3c2+RND (6 )+7;RETURN 
*90 M=Mb7c8+RND C5)-G;RETURN 
100 M=Mb3c4-RND (9 );RETURN 

110 M=Mb9c10+RND (Mc5+1 ) ;L=L+25b((B=5)b2-1);RETURN 
120 M=Mb13c14+RND (Mc5+1 );L=L+15b(C B=G)b2-l);RETURN 
130 GOTO 110 
140 GOTO 120 
200 IF M< 0M=1 
210 IF R-Mc80 >0GOTO 320 
220 T=T+Rb3G00cM 

230 CY=W;CX=-59;BOX 0,W,160,J,2;PRINT "FINISH LIN E”;GOSUB GG0;CX=-7;CY 

»-5;PRINT *0.0 ||1 “ Ml - - | 

240 CY=-24;PRINT "YOU PLRCED #",#3,TcCYb2)-5;PRINT "RUG. SPEED = -,*1,Yb360c(Tc 
9), “MPH 

270 IF JY(1 )RUN 
280 GOTO 270 

320 IF M>280CY=-30;PRINT “LERD F00T M " 

390 T=T+30;R=R-Mc80 
395 IF M< 20GOTO 50 

400 IF (P=1) + (P=2 )+(P=4)+(P=GJGOTO 40 
410 P=P+1;GOTO 50 

430 GOSUB G50;IF M>280BOX 0,3,160,1,1 

440 CY=W;CX=-G5;PRINT "SMASH - INTO THE WALL!“;GOTO 270 
*450 CX=-71;CY=W;BOX 0,W,158,11,2;GOSUB 450+Pbl0;GOTO 515 
STARTING LINE”;RETURN 
MID STRAIGHT-flWAY";RETURN 
APPROACHING LEFT TURN";L=L+Mc(U+U);RETURN 
MID LEFT TURN";L=L+McU+7;RETURN 
APPROACHING RIGHT TURN“;L=L-Me(U+U);RETURN 
MID RIGHT TURN";L=L-McU-7;RETURN 

515 IF N=0IF A=QGOTO 520 

516 IF A=Q N=N-1;GOTO 520 

517 N=RND (5)+4 

520 BOX 0,3,160,1,2;FOR X=-70TO Mc2-70STEP 2;BOX X,3,2, 

-5;PRINT #1,A,".",N;GOSUB 660 
540 FOR B=1T0 8;CY=-30;BOX -47,CY,66,8,2;GOSUB Bbl0+550;FOR Z=1T0 70;IF TRC1)CY 
= -30;PRINT *<HERE GOES>";RETURN 
550 NEXT Z;NEXT B;GOTO 540 


;GOTO 430 


460 PRINT 
470 PRINT 
480 PRINT 
490 PRINT 
500 PRINT 
I* 510 PRINT 


,1;NEXT X;Q=A;CX=-7;CY= 
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Colon 0naan/Light Shout: Ontenface Bally to any ( Off FOUR TV. v 
$teneo Speahen* t cneating. New Visual/f)u*ical f OffTfhFAQhh. p5Tff | 




i*t.of Sept. 

(Unite fon FRff_ 
pinioned ( at- 
alog.. 


Murtim 

ASTWVfcOL 


maximum memony. 

Coyote-Roadnunnen Race 
7 fie Mummy* / nea*une 


B R n Co 


irb, 
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Fonm*. 

Ontenface. unit with fa**ette Demo. & Orvstnuct- 
ion* + lutonial. .$39* 95 Qneate you.n own. A/it. 

2k game* Available. All utilise the special ()naphlc*TT^CC.(plo/t* and -y-_ 
Sound* that the Dally la famous foa and employ maximum memo/iy. Any /wo (2) X J 
game* on Ca**ett, wlui documentation $10. ^ 

ATTN: Rnice* going, 
up to % 12. 95 on 

' * ' Ayatollah Da/it Bound 

T~D lie. lac toe 
Tangetf/nlo of game//) 

Riven, (ily gamble a. 

Fox and lie Fane 
Galactic Wan 2002 
j ink the U-Boat 
Rescue Ain. Dnop 
Kill /he Vulcan 
Seanch & De*tnoy 
Light Show Rnognam #2 
(U*e with intenface) 

Phantom Stan. Fight 2003 


Ain. Raid 
(na/y Ball 
Bom.baAdx.en 
Mi**ion Ompo**. 
Space Que*t 2001 
Atom Sma*hen 
Stan Ba*e 2000 
I he Black Lagoon 
Space Chechen* 
(Jalm yumpen* 

: 1 to 5 Rlayen* 

include* com¬ 

pute n too. 


R\ 


Visa & Fla*ten (hinge Accepted. 

Rnlce* going up Sept. 1*t 


Dave Martin 

3408 Braddock St. 
Kettering, OH 45420 

L . m 




i PRINT "FLOOR IT" ; RETURN 
l PRINT "ACCELERATE";RETURN 
l PRINT "BRAKERETURN 
I PRINT "BRAKE HARD”;RETURN 
I PRINT "SHARP RIGHT";RETURN 
I PRINT "RIGHT";RETURN 
) PRINT "SHARP LEFT";RETURN 

3 PRINT "LEFT" ; RETURN ___ i0 

3 BOX 0,22,39,J,1;BOX L,20,3,5,2;BOX L,25,1,4,2;BOX L-3,19,1,3,2;BOX L+3,19,1 
!; BOX L+2,25,1,2,2; BOX., L~2 ,25, 1,2,2; RETURN 
3 CY=-15;CX=55;PRINT |1,T;RETURN 


DAREDEUIL You see a windshield and instruments. The car on the screen is 
located IateraI Iy according to your instruct ions. The avail able 
instructions will appear at the bottom in order, use TRC1) to choose. 
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i . 

' 2 . 

3 .THE PITS 

4 .BY REX GOULDING 

5 &(9)=167;&(11)=249;&(1)=249;FC=249;BC=119 
10 CLERR 

17 PRINT 

18 PRINT " THE PITS!" 

19 PRINT 

20 PRINT "ENTER NRME, THEN PRESS GO*"’ 

30 N=0 

40 FOR R=1T0 10 
50 B=KP 

60 IF B=13G0T0 110 
70 TU=B 
80 N=N+1 
90 @(A)=B 
100 NEXT fl 
110 CLEAR 
115 PRINT 

120 PRINT "THANK YOU ", # f 

130 FOR A=1T0 N 

140 TU=@(A) ^ 

150 NEXT A 

180 FOR A=1T0 152 '* 

165 NEXT A 
170 CLEAR 
200 X=-76;Y=26 
210 C=0 

220 FOR A=1T0 100 

230 BOX 75-RND <145),41-RND C77),7,7,1 
240 NEXT A 

243 PRINT "BEGIN” 

244 BOX X,Y,1,1,3 
248 BOX 72,-42,3,3,3 
247 CX=-77;CY=-40 
250 IF JX(1 )GOTO 270 
255 IF JYC1)GOTO 270 
260 GOTO 250 
270 PRINT 

275 BOX 72,-34,3,3,3 
280 BOX 72,-42,3,3,3 
290 Y=Y+8 

295 BOX 76,0,1,80,1 
300 FOR A=1T0 10 

310 BOX 75-RND C145 ) ,-27-RND (8),7,7,1 
320 BOX X,Y,1,1,3 
330 X=X+JX(1)b2;Y=Y+JY(1)b2 
340 BOX X,Y,1,1,3 
350 IF PX(X,Y)=0GOTO 410 
360 MU=“1" 

370 NEXT A 
380 C=C+1 
400 GOTO 270 

410 IF X=72IF Y=-42G0T0 560 
420 FOR A=1T0 10 
430 &( 23)=255;&(21)=255 
440 BC=40 


PITS The object of the gome is to 
move the small dot in the upper left 
corner past the pits to the center 
of the medium-size box in the lower 
right corner. The clunker is that 
the pits move up the screen all the 
time and can catch you. Each time 
the screen rolls up is counted as a 
8 successful trip in 16,J 
do ing well. „ _ *.. t 

T. R. Goulding, MMC 
CPO MESS 

USS CALIFORNIA CGN-36 
FPO New York, W 


move 

moves 


450 NEXT A 

460 FOR A=1T0 30 

470 BC=55 

480 NEXT A 

490 &C 23)=0;&(21)=0 

500 BC=119 

510 PRINT “YOU BLEW IT ", 

520 FOR A=1T0 N 
530 TU=@(A) 

540 NEXT A 

550 GOTO 620 

560 PRINT "YOU WON ”, 

570 FOR A=1T0 N 
580 TU=@(A) 

590 NEXT A 

600 PRINT C," MOOES” 

610 IF C<16PRINT "GOOD WORK hi- 
620 PRINT 

630 PRINT "PLAY AGAIN? (PULL TRIGGER)" 
640 FOR A=1T0 150 
650 IF TR(1)GOTO 110 
660 NEXT A 

670 PRINT "NEW PLAYER? (PULL TRIGGER)" 

680 FOR A=1T0 150 

690 IF TR(1)CLEAR ;GOTO 17 

700 NEXT A 

710 PRINT "SO LONG FOR NOW 
720 :RETURN 
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The UIPER SYSTEM 1 is the first of a series of custom manufactured, 
quality products made for the Bally Home Computer/Professional Arcade. 
With this 'system, you can begin the evolution of your BaIly from the 
Professional Arcade to a powerful graphic computer. The UIPER SYSTEM 1 is 
a lot more than just a 16K memory expansion. Features and capabil ities are 
Iisted as follows: one dual position front panel select switch for 

starting the memory at either 8 or 24K. This will make it convenient for 
the user to copy any game cartridges and run them in extended RAM where 
they can be modified or copied to tape. Next, one dual position front 
panel switch for Auto-Write-Protect or Programmable Write-Protect. The 
Automatic Write-Protect mode allows the user to load Jay Fenton's excellent 
new 8K Extended Basic from tape, and then use the Basic to write programs 
in the remaining 8K. The ProgrammabIe-Write-Protect allows you to 
Write-Protect or Write-Enable the entire 1SK RAM board with simple Basic 
statements. Next, the RAM board located inside the cabinet has two eight 

position DIP switch packs. Switch pack one enables 4, 8, or 16K bank 

selectable addressing, and switch pack two controls special bus functions 
to the Bally and selects either external or internal clocking. SYSTEM 1 
also includes a fuse-protected +/- 5 volt and +/- 12 volt power supply. 
These voltages provide power to the RAM and keyboard interface circuitry. 
Also included is a heavy duty grounded AC line cord, and filtered AC outlet 
on the back that is controlled by the front panel switch. The SYSTEM 1 

Interface Board provides the bus conversion from the Bally to the UIPER 

a serial keyboard interface which will allow the use of a UIPER 
erialized ASCII keyboard with the system. It also includes one 

connecting the UIPER to the BaIly. The RAM board and keyboard 

unplugged from the SYSTEM 1 and Iater plugged directly into the 
5 without any changes because the equipment is completely (software 
and hardware ) compatible. For those of you who are home-brewers, when the 
SYSTEM 1 is upgraded to a SYSTEM 5, the SYSTEM 1 cabinet, power supply, 
and bus interface card can be used to help prototype your own computer 
circuits. The entire system is housed in an attractive heavy duty black 
aluminum cabinet with simulated wood grain side panels and custom 
siIk-screen i ng. The dimensions are 10"xl0"x4-1/4" 

Due to the response received when originally advertised in past issues 
of the ARCADIAN, there have been several changes and improvements made to 
the System RAM card and Interface Card. Therefore, please refer to this 
advertisement and following advertisements for accurate product 
information, pricing, and ava 11abiI ity. SYSTEM 1 is available now for 

the special introductory price of #225, and a free Extended Basic (on tape 
and documentation) is included. 


bus, pIu 
or other 
bus cab I 
can be 
SYSTEM 5 
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Alternative Engineering, Inc. P. 0. Box 128, Gardiner, ME 04345 


V ' - 


E PROM BURNING now available via Perkins Engineering. Send your machine 
code program on tape and $20, and receive the program blasted into a 2532 
or 2732. You will then be able to plug the program into the machine via 
the game cartridge slot (you have to make up the mechanical parts), just 
like the commercial ones. Anything can be loaded (up to 4K). Blue Ram 
owners can upload a Bally game, modify the rules, playing field, whatever, 
and have this personal modification made relatively permanent (since the 
EPROM can be erased). Contact Perkins Engineering, 1004 
Pleasant Ave., Boyne City, MI. 49712 

NEWLY released Bally Uideocacle game - Galaxian - now available. Send 
for free price list, special discount to ARCADIAN readers. SFP, 1064 N. 
Alta, Dinuba, CA 93618 


- *r 


New Bally Arcade with Basic and Interface $250 Marsha I I Fonq, 
213-666-6197 

TRADE game cartridges Marshall Fong, 213-666-6197 


= \ \o = 


ARCADIAN 

Robert Fabris, translator 
3626 Morrie Dr. 

San Jose, CA 95127 



' . ZIP CODE ADDITION came through this month - you'll see the additional 1 fiur* 
^igits on my return address. Certainly not needed now, but its another 
step for the planned automation of some of the mails.. 


RESUBSCRIPTION TIME AGAIN The next issue will be the last for Uolume 
Three, and UoIume Four is currently scheduled to start in November. I run 

this paper on an Annual Uolume basis, for ease in bookkeeping and 

calculating printing quantities. The subscription rate will again be 
.$12.50, and subscriptions are now being solicited. , 

SACKCLOTH AND ASHES heaped upon me by Steve Halters because I left out some 
data which would make the Bally Black Box (last issue) more understandabIe 
and useful. The required data is at the top of page 118. 

SERENDIPITY, at least that's what Skip Atkinson expressed, telling me that.' 
the little music program by Mike Peace made a nice addition to the 'Old * 

{Bent Nose'. program, both in the last issue. He suggests the following: 

Delete lines 1,2,3 and change 710 to: 710 RETURN then change 1090 to * 

read *„ 

1090 @( A )=@( R ); @( R )=0; GOSUB 1150; RETURN* 
and add ^ V 

1150 FOR A=256T0 0STEP -4 
t 1150 &( 23 )=A;&( 21 )=A;&( 19 )=200 

1170 NEXT A;&(23 )=0;&(21)=0;RETURN ♦ 


TELEPHONE GYRATIONS Moving another step into the computerized 
communications world, I now have Ma Bell's "call forwarding” system, which 
fallows me to transfer daytime incoming calls to another line. In doing so, 
{the number here changed and is now 408-272-1060. 


HOW TO ADD SOUND EFFECTS 
TO DAREDEVIL 

By George Moses 

One of the most delightful games I’ve seen in recent months 
is the Daredevil game that appeared in the August issue of 
Arcadian. Unfortunately, because of sketchy directions it took 
awhile to fully understand how to play the game. It’s really very 
simple. Look at the top of the screen for information of the 
road ahead and the lateral position of the car on the track. Look 
at the bottom of the screen for a choice of commands to make 
the car go faster, slower, right or left, with two intensities for 
each command. When the command you want to use shows on 
the screen, simply pull the trigger and watch what happens. If 
the command goes by before you can trigger it, just wait. It will 
come around again. 

Daredevil lacked only one feature. Sound effects! I have 
fixed that with the following changes that’ll make you think 
you’re at the Indy racetrack with pistons popping and cars 
crashing into the wall... 


You’ll need to gain some memory space, so delete lines 1 
through 4. Also, delete the NT = 0 from line 10. We’ll type that 
in later as a direct command. Now change the following lines: 

210 FOR C = 17TO 22;&(C) = 200;NEXT C;&(16) = 255 - M;&(20) 
= 100;IF A-M + 80 ►OGOTO 320 
270 FOR A = 16TO 23;&(A) = 0;NEXT A;IF JY(1)RUN 
Without a line number type the following: 
:PRINT;LIST;PRINT “:RETURN ;NT = 0;RUN 
Don’t hit GO until you have your tape player running on 
RECORD for a few seconds. Press GO and the program will be 
saved on tape complete with the automatic -.RETURN to turn 
off your interface, the NT = 0 command and a RUN to autostart 
the program from tape. Once you learn to play this game you’ll 
love it!!! 
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120 

130 

140 

150 

180 

190 

200 

210 

220 

230 

240 

250 

255 

260 

270 

280 

290 

300 

310 

315 

320 

330 

340 

370 


410 

440 

460 

470 

480 

485 

490 

500 

505 

508 

510 

520 

525 

530 

550 

560 

570 

575 

580 

590 

600 

610 

630 

650 

655 


.INVISIBLE WAR 
-BY JAMES WINN 
CLEAR ;FC=7;BC=0;NT=0 
C=0;D=0;H=0;1=0 
PRINT "DIFFICULTY 

PRINT *1. EASY";PRINT “2. MEDIUM";PRINT “3. HARD 

K=KN(1 )c100+2 

CX=-40;CY=-20;PRINT K 

IF TRC1)GOTO 220 

GOTO 180 

E=K;CLEAR 

PRINT "HOW MANY LASER BLASTS";PRINT "FOR YOUR SHIP 
J=KN(1)c3+57 
CX=-40;CY=-20;PRINT J 
FOR N=1T0 400;NEXT N 
IF TRC1)GOTO 280 


GOTO 240 
F=J;CLEAR 
A=RND (76)-38 
B=RND (76)-38 
A=A+JY(1)bl0 
GOSUB 710 
IF A >38A=38 
IF A<-33A=-33 
IF BC-33B—33 

IF B >A-10IF B<A+10GOTO 525 
IF JY(1 )=0GOTO 400 

BOX -60,A, 11,1,3;BOX -63,A,2,7,3;BOX -60,A,11 
IF TRC1)GOTO 440 
GOTO 310 

BOX -60,A,11,1,3;BOX -63,A,2,7,3 

LINE -50,A,4;LINE 60,A,3 

&(21)=255;&(23 )=255 

LINE -50,A,4;LINE 60,A,3 

BOX -60,A,11,7,2 

&( 21)=0;&(23)=0;1=1+1 

IF A>B-10IF A<B+10B=A;H=1;GOSUB 700;GOSUB 800 

IF I=FGOSUB 700;GOTO 910 

IF I+10=FGOSUB 700;GOSUB 1000 

IF TRCDGOTO 510 

GOTO 300 

&(9)=33;FC=127;&(2)=7;&(3)=7 

BOX 60,B,11,1,3;BOX 60,B,1,5,3 

LINE 50,B,4;LINE -60,B,3 

&( 21)=255;&(23)=255 

LINE 50,B,4;LINE -60,B,3 

BOX 60,B, 11,5,2 

&( 21 )= 0 ;&( 23)=0 

IF E=lGOTO 650 

IF E=2G0T0 630 

IF B >A-7IF B<A+7G0SUB 700;GOSUB 800 
IF B>A-5IF B<A+5G0SUB 700;GOSUB 800 
IF B >A-3IF B<A+3G0SUB 700;GOSUB 800 
IF TRC1)GOSUB 710;GOTO 440 _ 
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G60 GOTO 300 
700 &( 9 )=50;&( 2 )=0;&(3 )=0;FC=7; RETURN 
710 &(9)=71;FC=7;&(0)=0;&(l)=0;&(2)=57;&(3)=57;RETURN 
800 IF H=lGOTO 805 
803 P=-60;G=A;GOTO 810 
805 P=G0;Q=B 
810 IF Q>330=33 
812 IF 0<-34Q=-34 

815 &C21 )=255;&C23 )=255;FOR L=1T0 15;BC=7;BC=0;FC=90;BOX P,Q,L,L,1;NEXT L 
820 FOR L=1T0 13STEP 3;B0X P,Q,L,L,2;NEXT L;&(21)=0;&(23)=0;CLEAR 
840 IF H=1C=C+1;GOTO 900 
850 D=D+1 

8B0 FOR N=1T0 200;NEXT N 

900 H=0;B=50;CLEAR ;RETURN 

810 FC=7;CX=-62;CY=40;PRINT C,D 

812 CX=-20;CY=0;PRINT "GAME OUER 

815 CY=-35;PRINT “ TO PLAY PUSH JOYSTICK 

317 FOR N=1T0 1000;NEXT N 

320 IF JYCDRUN 

830 GOTO 820 

1000 CLEAR ;NT=0;FC=126;BC=0 

1010 CX=-60;CY=35;PRINT “10 LASER BLASTS LEFT 
1020 FOR L=1T0 10 

1030 CX=-30;CY=0;PRINT “CRITICAL!!! 

1040 X=-30;Y=0;BOX X,Y,80,8,2 

1050 &(17)=12;&(22)=250 

1060 FOR M=1T0 100 

1070 NEXT M 

1080 &(17)=0;&(22)=0 

1080 NEXT L;CLEAR ;RETURN 


SYMMETRICAL ART 
BY ROB ROSENHOUSE 
FOR SUPER SOFTWARE 


-78,A,3;LINE 0,40,4 
-78,A,3;LINE 0,-40,4 


6 . 6/10/1381 


8 :RETURN ;NT=0;Z=RND (15) 

10 CLEAR ;LINE 0,-40,4 
20 FOR A=40TO -40STEP -Z 
30 LINE 78,A,3;LINE 0,-40,4;LINE 
70 LINE 78,A,3;LINE 0,40,4;LINE 
80 NEXT A 
90 IF C=2G0T0 200 
■ 95 C=2 

100 FOR A=2T0 82STEP Z 
110 BOX 0,0,A,84-A,3 
120 NEXT A 

150 FOR A=1T0 1000;NEXT A 

160 BC=RND (256);FC=BC+12+8bRND (32);RUN 

200 Z=Zc2;IF Z<1Z=1 

205 FOR A=40TO 0STEP -Z 

210 LINE 0,A,4;LINE A,0,3;LINE 0,-A,3;LINE -A,0,3;LINE 0,A,3i 
. 220 NEXT A 
230 C=1;GOTO 150 
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TELLING THE 
By Bob Henssl 

. 5 : RETURN ; CLEAR ;JNf=l ;*BC=249; FC=7;&( 0 )=249; &( 1 )=249; &( 2 )=126;&( S 

Sprint "score* , ;k=500 

4 .10 CY=25;CX=16; PRINT "11 1 ^ 

*" 20 CY=29;CX=37;PRINT "12" 

40 CY=13;CX=7;PRINT "10 2 

50 CY=0;CX=9;PRINT "9 3 & 

60 CY=-12;CX=13;PRINT ”8 4 

70 CY=-24;CX=22;PRINT *7 5 

80 CY=-30;CX=39;PRINT "6 

130 BOX 40,0,80,80,3;BOX 40,0,74,74,3;BOX -40,42,4,2,1;BOX -40,40,6,2,1;BOX -40 
,37,8,4,l;BOX -40,35,10,2,1;BOX -40,33,12,1,1 

.320 BOX -40,29,14,8,1;BOX -40,28,15,5,1;BOX -40,28,18,3,1;BOX -40,28,16,1,2;BOX 
-40,28,14,3,2;B0X -40,28,10,5,2 

340 BOX -40,28,3,3,1;BOX -40,30,1,2,1;GOTO 3000 
g-500 20203 )=256bU+H;CfiLL 20200; RETURN 

^890 LINE 39,0,4;GOSUB 900+M;LINE X,Y,E;MU=69;GOTO 990 


900 X=39;Y=24;RETURN 

- 

»> 

905 X=53;Y=21;RETURN 

Bob Hensel* 

V 

910 X=60;Y=12;RETURN 

^ 8428 Ingleside five S. 


915 X=63;Y=0;RETURN 

** Cottage Groue, MN 55016 

5 

920 X=60;Y=-12;RETURN 



925 X=53;Y=-20;RETURN 

V ' 



930 X=39;Y=-24;RETURN 


935 X=25;Y=-20;RETURN 
940 X=18;Y=-12;RETURN 
945 X=15;Y=0;RETURN 
950 X=18;Y=12;RETURN 
955 X=25;Y=21;RETURN 

990 LINE 40,1,4;GOSUB 1000+R;IF M<30GOTO 995 


992 X=X+2;IF R<9IF R>3X=X-4 

994 Y=Y+2;IF R<6Y=Y-4 
*995 LINE X,Y,E;MU=67;GOT0 J 

1001 X=48;Y=12;RETURN 

1002 X=53;Y=7;RETURN 

SCOUt A 

3 A* 

M 12 1 


1003 X=54;Y=l;RETURN 

1004 X=53;Y=-7;RETURN 

1005 X=48;Y=-12;RETURN 

RIGHT 

^3 


1006 X=40;Y=-14;RETURN 

1007 X=30;Y=-12;RETURN 

1008 X=25;Y—7;RETURN 

the time is 

*v' 


1009 X=26;Y=1;RETURN 

1010 X=27;Y=7;RETURN 

1011 X=30;Y=12;RETURN 

1012 X=40;Y=14;RETURN 

2.*50 



3000 R=RND (12);M=RND (12 )b5-5;E=1;J=3020;GOTO 890 ■ 

3020 CY=-32;PRINT “THE TIME IS“;8=0;B=0 

3026 fl=fl+JY(1 );B=B+JX<1)b5;CY=-40;CX=-65;PRINT #1,fi,*:",#1,Be10,#1,RM,* *,;IF TR 
C1 )=0GOTO 3026 

3050 CY=0;CX=-71;IF fi=RIF B=MGOSUB 6000;GOTO 4000 

3070 GOSUB 7000;PRINT #4,R,":“,#1,Me10,#1,RM;GOSUB 8000;GOTO 4000 
4000 fi=RND (12 );B=RND (12 )b5-S;CY=-32;PRINT "SET TIME TO";PRINT #4,fl,”:", 

,#1,RM,“ ", 


l I 4 


#1, Be 10. 


















i; E>2; J=3000; GOTO 890 


4045 IF JY(l5=0IF JX(1)=0GOTO 4075 
4045 E=2;J=4050;GOTO 890 
,,4050 IF JXC 1 )#0R=R+JX( 1 ) 

4060 IF JY(1 )*0M=M+JY(1)bS 
4065 IF (R<1)+(R>12)R=l 
4067 IF ( M<0 )j-( M>55 )M=0 >.?' 

4070 E= 1; J=4075; GOTO 890 ' * ‘ , 

4075 IF TR(1 )=0GOTO 4045 
•$80 CY=0;CX=-71; IF fl=RIF B=MG05UB ( 

4090 GOSUB 7000;E=2;J=4100;GOTO 890 
4100 R=8;M=B;E=1;J=4110;GOTO 890 
^110 GOSUB 8000;E=2;J=3000;GOTO 890 

if 000 PRINT "R I G H T*;Y=50;FOR X=110TO 50STEP -3;H=X;Y=Y-2;U=Y;GOSUB K: 
T<EXT X 

6010 NT=15;F0R Z=1T0 5;GOSUB K;MU=70;GOSUB K;NEXT Z;BOX -40,0,70,10 2;S= 
0;CX=-65;NT=1;PRINT #1,S,;CX=-77;RETURN 

7000 PRINT "W R 0 N G‘;NT=10;U=50;H=110;FOR Z=1T0 5;GOSUB K;MU=66;MU=60 1 
-SUB K;NEXT Z;NT=1;RETURN 

^B000 FOR Z=1T0 1000;NEXT Z;BOX -40,0,75, 40, 2;RETURN 

^ kT# ' O 


GOSUB K;* 
=S+1; CY=3 
MU=48;GQ 


This is an educational game to help 
children learn to tell time. The 
computer will randomly set the clock 
and ask 'THE TIME IS* the hours and 
minutes can be entered by using JX(1) 
and JY(1). If the answer is right 
a bird will fly from the clock to the 
bell and ring it. One will be added 
to the score. If you are wrong the 
bird will appear and chirp 'COO COOl 
Pull TR(1) when you have completed an answer. 
The computer will then ask you to set 
the time to a random time. You can 
move the hands by using JX(1) and JY(1) 


#(20200)= 

-43 


2 

53 


4 

10240 


6 

20210 

24 

8 

-13871 

26 

10 

-1936 

28 

12 - 

-32690 

30 

32 

34 

14 

12288 

16 

2432 

18 

527 

36 

38 

40 

42 

20 

-247 

22 

78 


#(20244)= 


68 

7628 

5460 

32612 

2036 

2044 

1022 

248 

224 

0 

0 


The bird is drawn using the Graphic 
Char Maker by Rich Tietjens (see page 
84 of the ARCADIAN) and enter: P 

ROW LEFT RIGHT 


0 

1 

2 

3 

4 

5 

6 

7 

8 
9 


0 

0 

29 

21 

127 

7 

7 

3 

0 

0 


68 

204 

84 

100 

244 

252 

254 

248 

224 

0 


TELLING TIME 

To input this program to tape so it’ll automatically load the 
listing plus the data,you’ll have to load it in two sections. Just 
follow these directions. 

Type the program into the computer then proofread. DO NOT 
RUN PROGRAM. Save it on tape by typing this command: 

:PRINT ;NT = 1;LIST;PRINT "-.INPUT 1 
Start your recorder on RECORD, then press GO. As soon as 
the program is done listing stop your recorder and RESET the 
computer, clearing the memory. Next, input this 2 line pro¬ 
gram: 

10 CLEAR; FOR A = 20200TO 20244STEP 2;PRINT 
“%(”,1H,A“) = ”,;INPUT “ ”©(A - 20200);NEXT A 
20 A = KP; :PRINT ;NT = 1;CLEAR ;TV = 0;TV = 1;FOR 

A = 20200TO 20244STEP 2;PRINT 
"%(",#1,A,") = ",@(A-20200);NEXT A;PRINT “RUN 


This segment is provided in 
case you want to try your 
hand at making the bird 
yourself. You don't have to, 
since the ?S( 20200 ) data 
— shown to the right will input 
the proper figure. 


Run this program and it will print “%(20200) = ” on the 
screen. See the chart above and input -43. As each suc¬ 
ceeding number comes up, input the number in the right col¬ 
umn, pressing GO after each entry. After the last entry of zero 
into address 20244, start your recorder on RECORD. Then 
press any key on your keypad and the data you have just input 
will be printed to tape automatically! 

s - 
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1 . 

2 .KENO II 2.0 ^ 

•3 .<01981 MSK • % , 

,*4 PRINT "PROGRAM DISPLAYS KENO CARDAND CASH REMAINING. YOU PICK 1 TO 15 NUM‘ 
BE^S USINGHAND CONTROLLER.", * 

5 PRINT “ NUMBER OFPICKS IS TALLIED NEXT TO GO. IF YOU PICK 1 TO 14 NUMBER' 
S, PICK GO TO START. 

* S PRINT “THE COMPUTER PICKS AND DISPLAYS 20 NUMBERS AND CALCULATES PAYOF 

7 PRINT " TO SEE PAYOFF TABLE PUSH ' c' ”,;IF KP="c"GOTO 2000 

1 8 PRINT 

9 INPUT "STAKE"C 

10 T=0;CLEAR ;GOSUB 900;C=C-1;CY=-33;CX=43;PRINT "S",#5,C, 

20 GOSUB 800;IF N< 81G0SUB 700;IF T<15G0T0 20 
30 GOSUB S00;GOSUB 500;IF H=0B=0;GOTO 40 
35 B=@(R+H-1 );C=C+B 

40 CX=-59;PRINT “OF",#3,T,,"GOT",H,,“PAYSS",#5,B, 

45 IF C< 1ST0P jt 

50 IF TRC1)GOTO 10 £ 

S0 GOTO 50 * 

500 R=0;IF T=1RETURN 

£10 FOR S=1T0 T-1;R=R+S;NEXT S;RETURN 

•*^600 H=0; FOR U=1T0 20;U=RND (80)-l;U=Ucl0;W=RM;X=-73+Wb16;Y=39-Ub9;IF PXCX-G,Y+4 
j3=0GOTO 580 

fsi0 IF PXCX, Y)=0U=U-l;GOTO 890 
620 H=H+1 
B30 GOTO 685 

680 IF PX(X,Y)U=U-1;GOTO I 
885 BOX X,Y,11,7,3 
890 NEXT U;RETURN 
700 IF PXC X-6,Y+4)T=T+1;GOTO 720 
710 T=T-1 

720 CY=-33;CX=-53;PRINT #2,T,;RETURN 
800 X=-73;Y=39;BOX X,Y,13,9,3 

810 I=X;J=Y;X=X+JXC1)bl8;Y=Y+JY<1)b9;X=X+16b(X<-75)-16b<X>75); 

Y >40 ) 

815 IF X=-73IF Y=-24IF JYC1) = -lY=-33 

820 BOX I,J,13,9,3;BOX X,Y,13,9,3;IF TRC1 )=0GOTO 810 
830 N=< X+73)cl6+l-< Y-39)c9b10;RETURN 

900 FOR Y=0TO 7;CY=39-Yb9;FOR X=1T0 10; C>^=-91+Xb 16; PRINT #2,X+Ybl0,;NEXT X;NEXT 
g V;CY=-33;CX=-75;PRINT "GO”,;RETURN 

2000 PRINT ;FOR T=1T0 15;GOSUB 500;FOR Q=1T0 T;PRINT #3,"PICK",T,” GET”,Q,” WIN 
f“,#5,@CR+Q-1 );NEXT Q;NEXT T;GOTO 9 
3000 SPRINT ;LIST ;FOR A=0TO 119;PRINT 
; NT=1 * ; : RETURN *;NT=1 


j Mark KeI Ier 
9538 Shumuiay Dr. 
Orangevale, CA 95662 




=Y+9b(Y<-25)-9b( 


" )=",@CA);NEXT A;PRINT RETURN 


KENO 

To more easily input the arrays to memory we have included 
an array-building loop. Type in the KENO program, then proof¬ 
read your listing. DO NOT RUN THE PROGRAM. 

Type in this program without a line number: 

CLEAR ;FOR A=OTO 119;PRINT‘‘@(’’,#1,A“) = ’’,;INPUT 
“ ”@(A);NEXT A 
GO 


The screen will prompt you for each data entry with 
“@(0) = ” etc. Just input the values from the chart (only the 
numbers to the right of the equals sign) pressing GO after each 
entry until you have input all the data through array address 
@(119). 

When the entries are complete, start your tape recorder in the 
RECORD mode. Then type: 

GOTO 3000 
GO 

Your program and the array you have just created will be 
saved on tape automatically! 
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@(0>=3 
@( 1)=0 
@( 2 ) = 12 
@(3)=0 
@(4>=1 
@(5>=42 
'@( 6 )=0 
$*<7>-l 
@( 8>=4 
@( 9)=113 
@( 10)=0 
@( 11>=0 
'*@( 12 )=1 
'@(13)=3 
@(14 )=820 


1 @(15)=0 

■ @( 30T=0 

@(45 >=0 t 

@(§0) = 10 4 

@(75 >=2400 

'@( 16)=0 

@(31 )=0 

@(46 >=0 

@(61 >=75 ' 

@(76>=13000 

@( 17 )=1 

* @(32)=9 

V 47 )=0 ’ 

'@(62>=380 

@(77>=25000 

@(18)=3 

@(33>=90 

@(48)=0 

@(63>=2000 

@(78)=0 

@(19)=0 

@(34)=1650 

@(49 >=2 

@(64>=12500 

@(79 >=0 

@(20)=1800 

@(35)=18000 

@(50>=20 

@(65>=19500 

@(80 )=0 

@( 21)=0 

@(36)=0 

@(51>=142 

@(66 )=0 

@(81 )=0 j 

@(82 >=0 * 

@( 22)=0 

@(37 )=0 

@(52>=1000 

@(67 >=0 

@(23 )=0 

@(38)=0 

@(53>=4500 

@( 68)=0 

@(83 >=2 

@(24)=0 

@(39 )=0 

@(54>=19000 

@(69 >=0 

@(84> = iG 

@(25)=20 

@(40 >=3 

@(55 >=0 

@(70 >=0 

@(85 )=78 

@(26 >=410 

@(41)=45 

@(56 >=0 

@(71>=6 

,@(86 >=700 

@(27)=8100 

@(42>=335 

@(57 )=0 

@(72>=28 

•^@(87 >=3600 

@(28 )=0 

i @(43)=4700 

@(58 >=0 

_@( 73 >=200 

@(88>=9000 

WJ@(29>=0 

@(-44 >=18500 

,@(59 >=0 

@(74>=850 

@(89>=25000 


@(90>=25000 
.@(91)=0 
«92)=0 
@(33 >=0 
@(94)=0 
@(35 )=0 
*@(9G)=3 
@(97)=8 
@(98 )=32 
@( 99 )=300 
@(100>=800 
@(101>=2500 
@( 102>=12000 
*%( 103)=25000 
"@(104>=25000 


,@( 105)=0 
@( 10 G >=0 
t @( 107>=0 
@(108 )=0 
@( 109)=0 
@( 110)=2 
@(U1)=8 
„@( 112)=21 
@( 113)=75 
@( 114>=240 
@(115>=2400 
*@( 116>=8000 
@( 117>=25000 
@( 118>=25000 
@( 119 )= 2 S 000 


> CONTEST ENTRANTS iri this 

^ogram, and MarlT^eT^h 

able to respond with both his scores and 1° 96 Geor 9 e Mos es was 

make these programs a little easier to handf T SUb_pro 9 rams that should 
heroes that help my Job a , Q * t 1 ° rge is one of the unsung 

choose less than tV maxi^ rs " u^^ Ke "°’ " y ° U deCid * *2 

character with the hand controller and ore!’ + k l CUrSOr dow " to the GO 
departing judge this time will be Grain And trigger while there. The 

6 Crai 9 Anderson, and many thanks. 


BLUE 

Uii I I 


RAM ENHANCEMENTS are under way. 
, n . . be . the Ex tended Basic language 

Toll th ' ^^ lEIng J th s , 


in^ RO^ b ‘! ° f h " r<W “ emerge 
in a ROM cartridge. The next issue 
’ and deliveries are expected in 30 
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The above procedure can be done without 
resetting the computer and losing the 

check the resets’wit^-LIsri/you 04 " 


ESOTERICA LIMITED 

- Original Software - 







































The UIPER SYSTEM 1 is the first of a series of custom manufoctured, 
quality products made for the Bally Home Computer/ProfessionaI Arcade. 
With this system, you can begin the evolution of your Bally from the 
Professional Arcade to a powerful graphic computer. The UIPER SYSTEM 1 is 
a lot more than just a 16K memory expansion. Features and capabilities are 
listed as follows: one dual position front panel select switch for 
starting the memory at either 8 or 24K. This will make it convenient for 
the user to copy any game cartridges and run them in extended RAM where 
they can be modified or copied to tape. Next, one dual position front 
panel switch for Auto-Write-Protect or Programmable Write-Protect. The 
Automatic Write-Protect mode allows the user to load Jay Fenton's excellent 
new 8K Extended Basic from tape, and then use the Basic to write programs 
in the remaining 8K. The ProgrammabIe-Write-Protect allows you to 
Write-Protect or Write-Enable the entire 1GK RAM board with simple Basic 
statements. Next, the RAM board located inside the cabinet has two eight 
position DIP switch packs. Switch pack one enables 4, 8, or 15K bank 
selectable addressing, and switch pack two controls special bus functions 
to the Bally and selects either external or internal clocking. SYSTEM 1 
also includes a fuse-protected +/- 5 volt and +/- 12 volt power supply. 
These voltages provide power to the RAM and keyboard interface circuitry. 
Also included is a heavy duty grounded AC line cord, and filtered AC outlet 
on the back that is control led by the front panel switch. The SYSTEM 1 
Interface Board provides the bus conversion from the Bally to the UIPER 
bus, plus a serial keyboard interface which will allow the use of a UIPER 
or other serialized ASCII keyboard with the system. It also includes one 
bus cable connecting the UIPER to the BaIly. The RAM board and keyboard 
can be unplugged from the SYSTEM 1 and later plugged directly into the 
SYSTEM 5 without any changes because the equipment is completely (software 
and hardware ) compatible. For those of you who are home-brewers, when the 
SYSTEM 1 is upgraded to a SYSTEM 5, the SYSTEM 1 cabinet, power supply, 
and bus interface card can be used to help prototype your own computer 
circuits. The entire system is housed in an attractive heavy duty black 
aluminum cabinet with simulated wood grain side panels and custom 
silk-screening. The dimensions are 10‘xl8*x4-1/4* 

Due to the response received when originally advertised in past issues 
of the ARCADIAN, there have been several changes and improvements made to 
the System RAM card and Interface Card. Therefore, please refer to this 
advertisement and following advertisements for accurate product 
inf ormat ion, pricing, and availability. SYSTEM 1 is available now for 
the special introductory price of S225, and a free Extended Basic (on tape 
and documentation) is included. 


Alternative Engineering, Inc. P. 0. Box 128, Gardiner, ME 04345 




ADS 


The "FALL 1981 BALLY Professional ARCADE Software and Hardware SOURCEBOOK" 
will be available October 15th. Over 90, 8J- by 11 pages with pictures. Includes 
the following Sections: System Summaries; Complete Software and Hardware Index; 
ARCADIAN Program Descriptions; THE BASIC EXPRESS Program Descriptions; Software 
Sources; Hardware Sources; Dealer List; Repair Services; Manuals Available; and 
User Groups. The ARCADIAN and THE BASIC EXPRESS entries are current thru the 
September editions of the Newsletters. RMH Enterprises 

The price for the SOURCEBOOK is $ 6.00. 6 35 Los Alamos Ave. 

Livermore, CA 94550 

WANTED ARCADE unit. please send details and asking price to Michael 
Uogel, PSC #2 Box 11466, APO S. F. CA 96367 

For Sale Bally Arcade. Comes with 6 controllers, Basic, Audio Interface, 
and the following videocades: 2001,2002,2003,2004,2005,2009,2010, 

3001,3002,3005, 4001,4002, 5001,5002. Also comes with service manual, 

Volumes 1 & 2 of the ARCADIAN and Cursor and partial Three for both. 

Machine is a little over two years old and never had a problem. $350 or 
best offer. Duane Olexa, P.O.Box 212, Neffs, OH, 43940 614-676-3378 

Bally Booster T Shirts. Airbrushed in full color $8 plus SI post, and 
handling. Send sizes and check to Don Gladden, 59400 Nine Mile Rd., South 
Lyon, MI 48178 Custom shirts also done - call for prices 313-437-3984 

For Sale Bally Arcade with 2 hand controllers, Basic, Tape Interface, 
Baseball, Blackjack, SeawoIf, Panzer Attack, Letter Match, Elementary Math, 
Professional Keyboard -(needs interface, with schematics, paid $70.) Any 
reasonable offer accepted. Bally works ok. Wm. Bender 806-403 Saratoga 
Ave., San Jose, CA 95129 
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^•'^NEW SCHEDULE <W^ ree Uideoccd^are noui aVa 1 ! afc?l e 
at outlets: #2011 Galactic Invasion; #2014 Grand Prix/DemoIition Derby;** 
*4004 Biorythm. We should see Space Fortress and Pirate's Chase in* 
October, and then Music Maker 1 in November. Then Bowling, Pac-Man, Wizard 
of Wor, and Coloring Book are due in January. Others in work include Zap, 
Checkers and Chess. The names of those that are full-size arcade games 
will change a little bit to provide some differentiation. 


The new AstroUisi 


sion Basic should be out by the time you receive this, 
you have difficulty in purchasing any of the above cartridges from your 

a *30 deposit for each cartridg^ 


sales outlet, drop 


Iine with 


RESUBSCRIPTIONS Thi 

subscription renewal is necessary. 

rate is again *12.50 for the full 


is the last issue of the year, and so aj 


year, UoIume IU.. 


RETROSPECTION The current volume, of 130 pages, surpasses all of our 
previous efforts, resulting in a per page cost of 9 cents. • We mechanised 
a c6nsiderabIe portion of the production, so that only a minimal amount of 
hand labor is necessary to get the Newsletter out to you. «• We had a booth 
at the West Coast Computer Faire and met a Iot of subscribers, and added a 
goodly number to our rolls - as well as giving a large number of urchins a 
chance to play the Galaxian cartridge. « We started the *100 per issue, 
contest for the best program of the month, and have made four disbursements; 
to date. Initially agreed to be funded by Dan Dawson of ftrtroUision, thesS* 

J payments have so far been totally funded by the ARCADIAN.«In the area g£ 
ubscr iber-operations, the Blue Ram memory addition was produced to a I I o»i/ 
ubscribers greater scope for their programs. • New hardware was announced 
|3 nd deliveries started on the Uiper memory addition system. *The Blue Ram 
►memory addition people are providing an EPROM-burning service, and the new 
Extended Basic is available in both ROM and tape versions.oflt least two 
people are working on programs to be available on PROMs for our enjoyment. 
•And Dick Belton is making the Bally self-check system (BALCHECK) available. 
So there have been a number of third-party activities to make this year 
better than last. 

& 

SATISFACTION One of the more pIeasant aspects of producing this 
Newsletter is experiencing the expansion of our capabiIities. We are aftf 
learning together, and this education is one of the major reasons for thi* 
ARCADIAN. The item that brings this to the forefront at the moment is Bob 
Weber's character making program. Back on page 83, Rich Tietjens showed us 
how to create a graphic character by manually calculating the inputs to his 
GRAPHIC CHARACTER MAKER program. Bob Hensel, in his TELLING TIME program 
tm p-114 used the technique to create his bird character - and now the 
Evolutionary processes used by our subscribers has provided us all with the 
technique that allows the computer to do all the work. And we all benefit. 

■’* CONTEST ENTRANTS this month are: MATCH by Ed Groebe and REBOUND by 

Dave Martin. The retiring judge this time is George Moses. 
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. ED G 

CLEAR ;BC=5G;FC=55 
CY=0;CX=-30;PRINT "MATCH" 

FOR C=1T0 500;NEXT C;CLEAR 

CY=0;PRIMT ” TRY TO MATCH";PRINT ;PRINT “ 

PRINT ;PRINT ;PRINT “ KEY IN LETTERS";PRINT 


PAIRS OF NUMBERS !" 

PRINT " FOR YOUR GUESS 


S0 

80 

100 

130 

150 

160 

170 

175 

180 

185 

190 

182 

196 

200 

210 

220 

230 

250 

260 

300 

302 

305 

310 

311 
320 

325 

326 

327 
330 
340 
350 

355 

356 

357 

358 
360 
370 

465 

466 

467 

468 

469 

470 

471 


PRINT ;PRINT ;PRINT " 

P=KP 

IF P >50GOTO 34 
IF P< 49G0T0 34 
CX=0;TU=P;G=P-48 
PRINT 

K=0;J=0;S=0;T=0;CLEAR 
CY=0;CX=-15;PRINT "WAIT !" 
FOR Z=0TO 85;@(Z )=0;NEXT Z 
U=RND (10 ) -1 
IF @(U)=1G0T0 130 
@(U)=1;GOTO 170 
FOR Z=1T0 2 
W=RND (20) 

IF @(64+W ) >0GOTO 175 

@(64+W)=U 

NEXT Z 

FOR Z=0TO 9;IF @(Z)=0GOTO ] 

NEXT Z;CLEAR 

X=-60;Y=30;Z=G4 

FOR Y=30TO -30STEP -20 

FOR X=-60TO 60STEP 30 

Z=Z+1;CX=X;CY=Y;TU=Z 

BOX X,Y,20,18,3 

NEXT X;NEXT Y 

FOR P=1T0 Q 

CY=0;CX=75;PRINT #0,P 

A=0 

IF P=1T=T+1;BC= 8 ;FC=7 
IF P=2S=S+l;BC=80;FC=7 
W=KP 

IF W< 65G0T0 320 

IF W >84G0T0 320 

IF @(W)=10GOTO 320 

GOSUB 400+W 

A=20 

0=KP 

IF U<65G0T0 350 
IF U >84G0T0 350 
IF U=WGOTO 350 
IF @(O)=10GOTO 350 
GOSUB 400+0 
GOTO 600 

X=-60;Y=30;GOTO 490 
X=-30;Y=30;GOTO 490 
X=0;Y=30;GOTO 490 
X=30;Y=30;GOT0 490 
X=60;Y=30;GOT0 490 
X—60;Y=10;GOTO 490 
X=-30;Y=10;GOTO 490 


1 OR 2 PLAYERS ?" 


The object of this board game, for either 
one or two players, Is to select the 
pairs of cards (A to T) which have match¬ 
ing numbers (0 to 9). As letter guesses 
are entered on the key-pad the cards are 
"turned over" to reveal the numbers. If 
a match Is made the two cards are removed 
from the board and the player tries two 
more cards. If a match is not made the 
cards are turned down again. 

If there are two players, they take turns 
guessing two cards at a time. At the end 
of the game the number of pairs matched 
for each player Is shown. If there Is 
just one player the number of tries need¬ 
ed to complete all 10 matches Is shown at 
the end. The challenge is to have as few 
tries as possible—10 would be a perfect 
score. 


Both the color and a number of the right 
of the screen indicate which player 
should enter a letter (blue is #1, red Is 
#2). A short instruction at the begin¬ 
ning explains what to do. 


Ed Groebe 

12046 Flambeau Drive 
Palos Hills, .IL 60463 
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4?2 

473 

474 

475 
475 

477 

478 

479 

480 

481 

482 

483 
■484 
490 
500 
510 
517 
520 
525 
540 
800 
620 
700 
710 
7 ii 
720 


X=0;Y=10;GOTO 490 730 
X=30;Y=10;GOTO 490 740 
X=60;Y=10;GOTO 490 750 
X=-60;Y=-10;GOTO 490 790 
X=-30;Y=-10;GOTO 490 800 
X=0;Y=-10;GOTO 490 820 
X=30;Y=-10;GOTO 490 825 
X=B0;Y=-10;GOTO 490 830 
X=-G0;Y=-30;GOTO 490 835 
X=-30;Y=-30;GOTO 490 840 
X=0;Y=-30;GOTO 490 850 
X=30;Y=-30;GOTO 490 855 
X=60;Y=-30;GOTO 490 880 
GOTO 500+R 885 
BOX X,Y,18,18,2 880 
CX=X;CY=Y;PRINT #0,@CW) 888 
RETURN 920 
BOX X,Y,18,18,2 930 
CX=X;CY=Y;PRINT #0,@(U) 931 
RETURN 935 
IF @< W )=<§>( U)GOTO 700 940 
IF @(W)#@(U)GOTO 800 950 
@CW)=10;@(U)=10 980 
IF P=1 K=K+1 970 
IF P=2 J=J+1 980 
IF K+J=10GOTO 900 990 


R=450 ' 

GOSUB 400+W 
GOSUB 400+U 
GOTO 305 
R=350 

GOSUB 400+W 
fl=3G0 

GOSUB 400+U 

NEXT P 

GOTO 300 

BOX X,Y,20,18,2 

CX=X;CY=Y;TU=W;GOTO 880 

BOX X,Y,20,18,2 

CX=X;CY=Y;TU=U 

BOX X,Y,20,18,3;RETURN 

CLEAR 

CY=0;CX=-24 

PRINT " GAME OUER" 

IF Q=2G0T0 970 

PRINT ;PRINT ;PRINT ” -,T,“ TRYS !“ 

GOTO 15 

BOX X, Y, 20,20,2 
RETURN 

PRINT ;PRINT ;PRINT “ #1 MATCHED”,K 

PRINT “ #2 " ,J 

GOTO 15 
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1 . REBOUND * * 

2 . BY DRUE MARTIN * 

.10 H=0;S=0;G=20;E=75;F=35;M=1000;R=100;N=10;GOTO 180 

20 L=C K#2 )b 127; &( 2 )=L.; &( 3 )=L; L=116+C K=2); BC=L; &( 0)=L;&(1 )=L; FC=0; X=5; Y=5 
30 CLEAR ;&(9)=212;FOR D=25T0 -25STEP -N;FOR C=-G5T0 65STEP N 
35 BOX C, D, 3,3,1;BOX C,D,5,1,1;BOX C,D,1,5,1;NEXT C;NEXT D 
40 NT=5;A=RND C3)b5-N;B=RND (3)b5-N;IF fl=0IF B=0GOTO 40 

50 CY=40;CX=-F;PRINT “/\/GET READY\/\";FOR 2=0TO 800;NEXT Z;BOX 0,40,1G0,8,2;I 
F KGOSUB 250 

G0 BOX X,Y,5,5,1;FOR T=-84T0 30bM;X=X+A;Y=Y+B;IF C ABSC X)=E)+(ABSC Y)=F)GOTO R 
70 P=P+PX(X,Y+2);F0R Z=0TO W;IF X=IIF Y=JGOTO 280 
80 IF P=84S=S+Mb(K+l )+8400-Tc2b5;GOTO 140 

30 NEXT Z;BOX X,Y,5,5,3;BOX X-A,Y-B,5,5,2;NEXT T;GOTO 130 
100 BOX X,Y,5,5,3;B0X X-A,Y-B,5,5,3;IF ABS(X)=E A=-Xcl5;B=JYC1)b5 
110 IF ABS(Y)=F B=-Yc7;A=JX(1)b5;IF ABS(X)=EGOTO 300 
120 MU=E;T=T-1;NEXT T 

130 &( 22) = 111;FOR Z=30TO 150;&C17)=Z;&<18)=Z+13;NEXT Z;&( 22 )=0; &C 17 )=0;&( 18 )=0; 
S=S+PbR-( 84-ABSC T) )c2b5;GOTO 180 

140 CLEAR ;&(9 )=50;BC=161;FC=134;CY=8;NT=3;PRINT #15,(K+l)bM;CX=-35;PRINT "++ B 
ONUS! ++ 

150 IF K<2CX=-F;PRINT “SCORE:“,#6,S 

1G0 &C21) = 15;FOR Z=1T0 25;F0R Q=15T0 G;&(19)=Q;NEXT Q;NEXT Z;&(21)=0;&(19)=0 
170 IF K<2K=K+1;P=1;GOTO G 

180 CLEAR ;&(9)=50;BC=0;FC=0;NT=0;PRINT “ YOUR SCORE HIGH SCORE 

190 PRINT “ - - 

200 IF S >H H=S 

210 PRINT #8,S,#14,H;CY=0;PRINT “BALL SPEED-a 

220 CY=-14;CX=-3G;PRINT “R U“;CX=-24;PRINT “E O N“;CX=-12;PRINT “B 

D“;CY=-39 

225 PRINT ” - THE MAD PROGRAMMER“,;BC=8;FC=7;CY=0 

230 BOX 0,-39,12G,9,3;W=&C28)c50;CX=0;PRINT #2,W,;IF TRC1)K=0;S=0;P=1;1=1;J=1;G 
OTO G 

240 GOTO 230 

250 I=RND ( 13 )bN-E; J=RND (G )bN-F; IF ( 1=5 )+C J=5 )GOTO 250 * i rrin ^ 

260 IF (I=J)+CI+J=10)GOTO 250 
2G5 IF K#2B0X I,J,3,1,2;BOX I,J,1,3,2 
270 FOR U=1T0 1G;BOX I,J,5,5,3;MU=R;NEXT U;RETURN 

280 IF P#84G0T0 130 _ 

290 S=S+Mb(K+l )+8400-Tc5b5|GOTO 140 

300 CY=36;NT=0;&(9)=-l;BC=142;PRINT “ BALL IS STUCK IN CORNER!!“;GOTO 130 

REBOUND is a game of skill for one player. Turn knob to select ball 
speed (O-fast 5-very slow) and pull trigger. You try to clear as 
many diamonds as possible off the board using a ball that may only 
be controlled as it bounces off the wall. Use joystick when ball 
approaches a wall to tell it to bounce (45 degrees) on the right, 
left, up, or down. You must hold joystick position until after ball 
has bounced off the wall. 

If you clear the board, you are challenged to clear a second and 
third board. On the second board, one diamond is marked and will 
flash before you begin. If you do not erase this one last . the 
game is over. On the third board, one diamond will flash, but is 
not marked. You must remember this one to erase it last! 

A couple more catches : points are deducted for crossing a path 
you have already travelled, and finally, you cannot bounce into a 
corner, or the game ends. 


/ Dave Martin 
i 3408 Braddock Street^ 
^Kettering, OH 45420 
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",;NT=2 


2 . 

3 . 

4 . GOBBLERS 

5 . BY BOB WISEMAN 
10 GOTO 900 

100 C=28-(@(P-1)-6)c 10b15;R=RMb15-72;RETURN 
110 FOR P=1T0 2;GOSUB 100;W=@(P-1);V=@(W);@(W)=0;IF V@(P+1)=@(P+1)+U 
0;MU=87;NEXT X 

113 IF V L=L-1;IF L=0GOTO 1000 
115 BOX R,C,15,15,1;NEXT P 
120 CX=Z;NT=0;PRINT @C2),@C3), 

125 FOR P=1T0 2 
130 B=JX(P);IF BGOTO 150 
>140 B=- 10b JY( P ) 

150 @(P+3)=B;IF BGOSUB 100 ;X=Bc5;Y=RMb2;BOX R+Y.C-X,13-XbX,13-YbY,2 
160 NEXT P;FOR P=1T0 2;GOSUB 100;B=@CP+3) 

170 IF BGOSUB 100;GOSUB 300;GOSUB 100;GOSUB 400 
180 NEXT P;M=M+1 
200 GOTO 110 

300 BOX R,C,15,15,2;IF B=0RETURN 
305 X=P-1;A=B+@(X);IF <A< 6 )+( A>55)A=@(X) 

320 IF @(2-P)=A A=@(X) 

330 @(X)=A;RETURN 
400 IF B#10BOX R,C-G,15,3,1 
405 IF B#-10BOX R,C+6,15,3,1 
410 IF B#-10BOX R,C-6,15,3,1 
420 IF B#1B0X R+G,C,3,15,1 
430 IF B#-1BOX R-8,C,3,15,1 

440 RETURN „ „ 

800 BOX R,C,7,7,1;BOX R- 1 ,C+ 2 , 2 , 2 ,2;D=@CA) ; IF D>1B0X R+2,C-1,2,2,2 
810 IF D >2B0X R+2,C+2,2,2,2 
820 IF D=4B0X R-1,C-1,2,2,2 
825 MU=Db15 
830 RETURN 

900 CLEAR ;&(10 ) = 16;CY=40;Z=-6 


;FOR X=lfb 


i 


Bob Wiseman 
118 St. Andrews ] 
Cincinnati, OH 


;CX=Z;P=1 


905 L=50;PRINT “ONE MOMENT PLEASE", 

910 FOR A=6T0 55;@<A)=RND (4 );@<0)=A;GOSUB 100;GOSUB 800;NEXT A 
920 @C0)=28;@(1)=33;@(2)=0;@<3)=0; CX=Z 
930 PRINT "GET READY -- SET'.", 

940 FOR X=16T0 176;&(10 )=X;FOR Y=1T0 4;NEXT Y;NEXT X 
950 CX=Z;PRINT "GO!! GO!! GO!!", 

990 GOTO 110 

1000 CX=Z; PRINT “STOP ',! STOP! ! ", "——mm 

1005 CX=Z 

1010 IF @(2)=@(3)PRINT “THIS GAME IS DRAWN",;STOP 
1020 IF @(2)>@(3)PRINT “PLAYER ONE WINS", 

1030 IF @( 2)<@( 3)PRINT, “PLAYER TWO WINS", 

1040 STOP 

1060 PRINT ABS(@(2)-@(3)),;ST0P 


THIS IS A TWO PLAYER GAME PLAYED ON A TEN BY FIVE FIELD. 

THE OBJECT OF THE GAME IS TO HAVE YOUR GOBBLER GOBBLE UP MORE 
SQUARES THAN YOU OPPONENT. WHEN PLAY BEGINS, USE THE JX AND JY 
TO DIRECT YOUR GOBBLER AROUND THE SCREEN. EACH PRINTED SQUARE 
IS WORTH ONE, TWO, THREE, OR FOUR POINTS DEPENDING UPON HOW MANY 
DOTS ARE THERE, THE GAME ENDS WHEN THE LAST SQUARE IS EATEN. 


(2.5T 
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, 1 .BOO 

10 CLERR ;FC=133;BC=0;H=1;CX=-11;CY= 6 ;PRINT "HAPPY";CX=-25;CY=-G;PRINT “HALLOW 
lEEN!"; GOSUB 70;GOTO 200 
15 0=3;Q=0;RETURN 

20 LINE 0,Yb40,4;LINE Xb2,Yb40,1;LINE Xb4,Yb38,1;LINE XbG,Yb35,1;LINE Xb8,Yb31 
,1;LINE Xb3,Yb2G,1 

21 LINE Xbl0,Yb20,1;LINE Xc5b53,Yb10,1;LINE Xbll,0,1;RETURN 
30 LINE X,Y,4;LINE X-10,Y-20,3;LINE X+10,Y-20,3;LINE X,Y,3;RETURN 
40 FOR T=1T0 Nbl11;NEXT T;RETURN 
4G BOX 0,-8,9,15,3;RETURN 

50 NT=20;MU=62;BOX -25,1G,23,21,1;MU=59;NT=3;GOSUB 40;LINE -35,5,4;LINE -25,25 
,3;LINE -15,5,3;GOSUB 40;RETURN 

60 LINE 0,“17,4;LINE Xb3,-15,3;LINE Xb5,-13,3;LINE Xb 8 ,-11,3;LINE Xb5,-26,3;LI 
WE Xb3,-28,3;LINE 0,-30,3;RETURN 

70 NT=150;FOR N=0TO 3;MU=@<N);NEXT N;NT=0;RETURN 


80 LINE 0,40,4;LINE Xb3,38,1;LINE XbG,35,1;LINE Xb8,25,1;LINE Xb9,15,1;LINE Xb 
9,5,1;LINE Xb8,-5,1 

82 LINE XbG,-15,l;LINE Xb5,-15,1;LINE Xb5,-30,1;LINE Xb4,-35,1;LINE Xb3,-40,1; 
LINE 0,-42,1;RETURN 

85 0=3;FOR N=-46T0 46;Q=Nc4;IF RM=0GOSUB 100 
8 G LINE N,G,4;LINE 0,43,1;NEXT N;RETURN 

87 FOR X=-1T0 1STEP 2;BOX Xbl8,9,13,15,3;NEXT X;GOSUB 46;BOX 0,-25,35,13,3 

88 FOR X=-14T0 14STEP 7;FOR Y=-28T0 -22STEP G;BOX X,Y,5,5,3;NEXT Y;NEXT X;RETU 
RN 


90 GOSUB 15;A=2;B=Z;FOR X=-54+ZT0 0;FOR Y=ATO 43;IF PX(X.Y) A=Y;GOTO 94 
92 NEXT Y 

94 FOR Y=BTO -43STEP -1;IF PXCX.Y) B=Y;GOTO 97 
9G NEXT Y 

97 Q=Q+1;IF Q=2 Q=0;GOSUB 100 

98 LINE X,A,4;LINE X,B,H;LINE -X,A,4;LINE -X,B,H;IF H=2RETURN 

99 NEXT X;NT=0;RETURN 
100 0=0+1;IF 0>11 0=4 

105 NT=20;MU=@(O);NT=0;RETURN 

200 FOR X=-5T0 5STEP 10;FOR Y=-1T0 1STEP 2;G0SUB 20;NEXT Y;NEXT X;LINE -7,40,4; 
LINE 0,43,1;LINE 14,43,1;LINE 0,40,1;Z=0;GOSUB S0 
300 FOR G=1T0 G;N=3;GOSUB 40;GOSUB 100;NEXT G 

500 Y=25;X=-Y;GOSUB 30;X=Y;GOSUB 30;Y=10;X=0;GOSUB 30;X=5;GOSUB G0;X=-5;GOSUB G 
0;N=5;GOSUB 40;GOSUB 50;GOSUB 50;GOSUB 50 
G00 GOSUB 70;BOX 0,-21,82,21,1;FOR N=0TO 2STEP 2;BOX 0,-25,17-N,15-N,3;NEXT N 
GG0 N=25;GOSUB 40 

700 CLEAR ;FC=11;GOSUB 85;B0X 0,-18,93,51,1;BOX 25,25,9,25,1;GOSUB 87;B0X 34,-3 
1,15,25,3;B0X 30,-33,2,2,3;BOX -34,-26,15,11,3 
740 BOX 0,0,149,87,3;N=5;GOSUB 40;H=2;GOSUB 15;FOR X=-75T0 -27;A=43;B=-A;GOSUB 
97;NEXT X;B=23 

752 GOSUB 15;FOR X=-26T0 0;B=23;GOSUB 97;NEXT X 

7G0 X=5;GOSUB 80;X=-5;GOSUB 80;N=2;NT=20;FOR G=1T0 10;FC=RND (25G);MU=83;MU=82; 
GOSUB 40;NEXT G;NT=0;FC=92;H=1 

1000 Z=10;GOSUB 90;FC=7;BC=0;GOSUB 87;CY=-40;CX=-70;PRINT "TRICK.GOSUB 70;N 
=9;GOSUB 40;FC=155;BOX 0,24,151,39,2 

1200 CX=27;PRINT "OR TREAT!",;LINE -60,G,4;LINE G0,6,1;GOSUB 85;G0SUB 46;LINE 0, 
4,4;LINE -7,-10,2;LINE -4,-15,2 

1300 BOX -7,-22,5,5,2;FOR N=-44T0 -20STEP 4;LINE N,0,4;LINE N-10,-35,1;GOSUB 100 
;LINE -N,0,4;LINE 10-N,-35,1;GOSUB 100;NEXT N 

1310 FOR N=1T0 11;GOSUB 100;NEXT N;NT=200;NU=56;NT=0;N=20;GO^jUB ^40;GOTO 10 

Steve Walters 

— ~ l 26 556 Langfield Drive .-—— 

NorthyiI Ie, MI 48167 
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The following ins£f\5£t^cJR«i apply for ease in tape-1 oacfing this 

program: 

After the program is ( entered, enter the following: 

| 10 TU=0; TU=2 ‘‘ •> > '• , 

'• 20 PRINT "&< 20 )=130 

30 PRINT ”@(0)=60;@(1)=59;@(2)=68;@(3)=67;@(4)=56;@(5)=59;@(6)=63;@( 7)=68;@( 8 
=64;@( 9)=61;@(10)=63;@(11)=S9 
40 < PRINT ':RETURN ;RUN 


Then turn thi 


is tape jr\ecorder on for recording oppress GO. 
ed and. ": RETURN: : TNPI IT 7“ nr c-.- 


ithe tape recorder off but do not rewind the tape. 

Then clear the memory (ERASE) and enter ,^Jne following prog^am^ 

<10 : PRINT '.PRINT " . HALLOul?:' EN GRAPHICS "; PRINT'*“ . BY S. WALTERS ' 1<§/^L 1/80" ; PR IN 
T ?L1STPRINT ; PRINT ".SJANDBY FOR“;PRINT ":RETURN ;:INPUT 2 
Then enter the following: :PRINT; RUN (without GO) 

Now turn the tape recorder on for recording and press GO. When alI the^ 
(Jata has been printed, turn the tape recorder off and rewind it. The tape' 
is now ready tj^ oad^ith INPUT and run automatical I y { when loaded. ' 

** WHERE's the Add-Under? Well, I understand that the specifications 

have finally been settled upon - apparent Iy everything up to now has been: 
on a sort of ' wh3dt if' 6r 'would you like' or 'suppose we added' basis. 
The board layout is underway right now, and the most recent list of 
“goodies" remains at 1GK RAM, 32K ROM, the UOTRAX speech chip, 2-GRASS, of 
course, and expansion capability to disc. At this point, I think they will 
have to work hard to get^a real prototype reacly for the Spring Consumer 
Electronic Show. I^e^ect }'■ ll be there to see what'^s what. . "J 

ARCADIAN PROGRAMS ON TAPE, mentioned oq p. 101, are becoming a 
Reality. As part of the advertising campaign to gt?t more subscribers, we 7 
are informing purchasers of the new ARCADE PLUS that they can receive q' 
..Sampler" tape of ARCADIAN programs. This samp Ier is on the 2000 baug 
format usable by the new machine, and contains 10 programs of various types'- 
(graphics and games). Each of the 10 authors of the programs on the tape* 
receive a royalty on each purchase. 

We are also working on a set of taped programs, to fall under the 
-general title of "Best of ARCADIAN, 198x", eachof which will contain a 
^election of the most popular of a particular Uolume of the ARCADIAN. We 
j^re now busy "transI ating" the programs to the 2000 baud format, and will 
r make these also available to purchasers of the ARCADE PLUS, as well as to 
purchasers of the AstroUi^sion Basic cartridge itself. Again, the authors 


wi I I 


**!■ 


. -‘Jf 


» EXTENDED BASIC,'"'bs produced by Perkins Engineering, is called “Blue”; 

Ram Bas i c “ <• w.£ind will sell for $sjf).95. The purchaser wij receive 
cartridge th’at ’sl ips into the game slot-and &an access the Bl ue Raij», memory. 
f*l,e wij I start to have some programs for this system in one or twij_issues l . 
The programs themselves should be- abj^ to work on the Uiper System as well, 
with possibly some trivial changes - we have to try them out to be more 
definitive. We strove to maintain compatibility, but there is always ond' 
or two little things that need changing. The AstroUision. and Bally Basics 
a/re similarly compat ibJ e ^. and their programs need minor changes. 


27 












- <RRCRDIRM 



10 :RETURN ;CLERR 

20 FOR X=-70TO G5STEP 8; BOXxftffl , 72, 1 ; NEXT X;FOR Y=-36T0 36STEP 8;B0X -G,Y ,1 
8,1,1;NEXT Y 
25 fl=-66;B=-32 
30 BOX R, B, 7,7,3 

40 BOX A,B,7,7,3;R=R+JX(1)b8;IF A>65fl=62 
50 IF fl<-70fl=-6G 
G0 B=B+JY<1)b8;IF B>36B=32 
G5 IF TR(DIF R>G0GOTO 200 
70 IF B<-3GB=-32 

80 BOX A, B, 7,7,3; IF TRCDIF KN( 1 ) >0BOX fl, B, 7,7, 1; GOTO 80 
80 IF TRCDIF KNC1K0BOX R, B, 7,7,2; GOTO 30 
100 GOTO 40 

200 A=128;B=0;C=0;FOR Y=32T0 -32STEP ~8;F0R X=-G6T0 -10STEP 8;IF PX(X,Y)B=B+fl 
210 R=Rc2;NEXT X;GOSUB 500;fl=128;E=0;FOR X=-2T0 54STEP 8;IF PX(X,Y)B=B+A 
220 R=Rc2;NEXT X;GOSUB 500;A=128;B=0;NEXT Y;GOTO 1030 
500 @CC)=B;C=C+1;RETURN 

1020 Y)=U;Y=Y+W;RETURN _ ^ \ 

1030 CLERR ;NT=1;X=0;Y=20200;R=Y;W=2;Z=1020 
1100 U=-43;GOSUB Z;U=6965;GOSUB Z 
1110 0=10240;GOSUB Z;0=20210;GOSUB Z 
1120 0=-13871;GOSUB Z;0=-1836;GOSUB Z 
1130 O=-32G30;GOSUB Z;0=12288;GOSUB Z 
1140 0=2432;GOSUB Z;0=527;GOSUB Z 
1150 0=-247;GOSUB Z;0=78;GOSUB Z ^ 

1160 W=1;Y=Y-W;FOR S=0TO CSTEP 2;IF @CS)=128IF @CS-1)=0CY=40;PRINT "DOES NOT COM 
PUTE!";L=1 


i 


Bob Weber 
G584 Swartout Rd 
Rlgonac, MI 48001 


1170 0=@(S);GOSUB Z;0=@CS+l );GOSUB Z;NEXT S 
1180 X(20203)=10320;CALLR 
1200 IF L=1L=0;GOTO 2000 

1210 CY=0;PRINT “OK?";IF KP*13PRINT "COMPUTING!“;GOTO 2000 
1220 CLEAR ;:PRINT ;NT=0;TU=0;T0=1;FOR X=RTO YSTEP 2 
1240 PRINT #1, "XC-,X, " )=",5iCX) 

1250 NEXT X; PRINT ".-RETURN ; RUN 
1260 :RETURN ;STOP 

2000 FOR Z=1T0 144;@CZ)=0;NEXT Z;A=0;FOR Y=-5T0 3;F0R X=0TO 15;R=R+1;IF PXCX Y)@ 
( R )=1 

2010 NEXT X;NEXT Y;fl=0;CLEAR ;FOR Y=-32T0 32STEP 8;FOR X=-66T0 54STEP 8;A=A+1;IF 
@(R)BOX X,Y,7,7,1 

2020 IJEXT X; NEXT Y;GOTO 20 ... 


Load the program and RUN it. The program will draw a 8 x 16 grid on- 
the screen, and there wiiI be a flashing cursor in the bottom left hand 
corner. Move the cursor with the joystick, and when you have it located, 
turn the knob to the right and press the trigger. This will blacken in a 
square. If you want to 'erase' , turn the knob to the left and press the 
trigger. When you are satisfied with the character, move the cursor to the 
right side of the screen and press the trigger. The machine will now 
compute the values and load them into a string. When it is finished, it 
will display the character in actual size on the screem and ask 'OK?' . If 
everything is the way you want it, prepare the tape you are going to use. 
and press GO. If it is not the way you want it, press any key other than 
GO* and you will be back in the character construction mode. 

If the computer says 'DOES NOT COMPUTE' , it means you have a single 
pixel placed in the left hand corner of either the left or right half of 
the drawing. When you do this you cannot load the values onto tape, 

because the poked value for one pixel at those locations is 32768, too big t 
for the computer. . rp Cl 








When you’re through 
playing “Space Invaders” . . . 

PLAY “SILENT NIGHT” 
on your Bally Arcade! 


PRESENTING 3-PART 
ARCADE CHRISTMAS MUSIC 


A 60 minute cassette tape 
that programs your Arcade 
to play 27 beautiful 
Christmas Carols in 3-part 
harmony, some with vibrato. 
Close your eyes and listen 
and you’ll think someone’s 
playing an organ! 


Just push: INPUT-GO and they all 
play consecutively. <fcO50 

All 27 programs on one tape . . . . Ip Z7 

Send check or money order to: 
iGEORGE mOSES CO. 



K 


HO E. North St., Brighton, mi 48116 
(313) 227-1575 
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SIG BALLY in Chicago is reforming after a long 
summer vacation. For more informatioft call Hank 
Chi u ppi 312-537-6079. New members welcome. 


ENTREPRENEURS may be interested in a new Newsletter devoted to the 
' Bkitchen-tab I e programmer, etc., who wants to use a microcomputer in 
business, or make a business out • of his computer. Entitled MICRO 
MOONLIGHTER NEWSLETTER, it is supposed to talk about methods of operation, 

I tax she It ers, mail order, advertising, etc., all geared to the small 
operator. . ^-Inquire of J. Norman Goode, 2115 Bernard five., Nashville, TN. 


37312.. 






DUNGEONS AND DRAGONS Game Aid Package 
player character generator. $10. 
miami, FL 34004 


j —- —- r *~ 

how with more programs, 
ppd Rich Tietjens PSC Box 


incIuding 
542, APO 


I've had a number of telephone calls from people looking for Fred Cornett.! 
The best available data I have locates him at 711 Pineknot, Big Bear Lake, 
CA 92315 714-866-5826 


Southern California dealer - Randy's TV P.O.Box 1109 El Centro CA 92244 
has many old Bally videocades on sale,. with a good deal of BASIC. Also in 
stock - Galactic Invasion, Space Invaders, Grand Prix 


SUBSCRIPTION 12.50 
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ARCADIAN 

• <; 
Robert Fabris, renewable • 
3S2G Morrie Drive 
San Jose, CA 95127-9990 
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BOX 94801 
SCHAUMBURG, IL 60193 



TAPE lO 


THE CHALLENGE NEVER ENDS, BECAUSE THE LEVEL OF PLAY IS BASED ON YOUR SCORE. YOU ARE IN 
A FIELD PICKING CLOVER ONE BY ONE AND FROM TIME TO TIME A LARGE (BONUS) CLOVER POPS UP. 
THIS SOUNDS EASY BUT WE'VE ALSO PUT A BULL IN THIS FIELD WITH YOU AND HE'IS GETTING MAD 
BECAUSE YOU'RE PICKING HIS CLOVER. THE MORE YOU PICK THE MADDER HE GETS AND THE FASTER 
HE RUNS. HE WILL GET YOU, SO WE'VE ALSO GIVEN YOU UP TO TEN LIVES. BELIEVE ME YOU WILL 
NEED THEM. THE GAME CAN BE PLAYED WITH ONE TO FOUR PLAYERS ON INDIVIDUAL CONTROL HANDLES 
KEEPS SCORE AND LEVEL OF PLAY FOR EACH PLAYER, CHANGES COLOR AS HIGHER LEVELS ARE REACHED. 
SIDE ONE HAS MACHINE GRAPHIC BULL AND MAN. SIDE TWO IS FOR THE MORE ADVANCED PLAYER. 

TAPE IS RECORDED IN BOTH BALLY AND ASTROVISION BASIC (THE COMPUTER SELECTS THE PROPER 
ONE). THIS IS PROBABLY THE MOST FUN AND CHALLENGING GAME EVER WRITTEN IN BASIC. 

LOADS QUICKLY. $10.95 






